جستجو بین دوتاریخ

[A_1397]

سلام دوستان. توی تاپیک جستجو کردم ولی مشکلم حل نشد. توابع جستجو بین دو تاریخ رو می خام. فرمت تاریخ بصورت 01/01/1390 هستش و میخام رکوردهایی که فیلد تاریخشون بین دوتاریخ وارد شده هست برگردونده بشه.

[MohammadGh2011]

سلام عليکم
تاپيک زير رو بررسي کنيد:
http://barnamenevis.org/showthread.php?286698-%D8%AC%D8%B3%D8%AA%D8%AC%D9%88-%D9%86%D8%A7%D9%82%D8%B5&highlight=%D8%AC%D8%B3%D8%AA%D8%AC%D9%88+%D8%AF%D9 %88+%D8%AA%D8%A7%D8%B1%D9%8A%D8%AE


موفق باشيد

[A_1397]

فلید تاریخ من از نوع text هستش و باید جستجو رو بین دوتاریخی که داخل دوتا تکست باکس وارد میشه انجام بدم. حالا مشکل من اضافه کردن روز به روز به تاریخ اولی است تا برسه به تاریخ دوم و اینکه تابع datediff تاریخ رو میلادی فرض می کنه.

[M.T.P]

مثال:


Dim strSql As String
Dim strDate1 As String
Dim strDate2 As String

strDate1 = "01/01/1391"
strDate2 = "01/03/1391"

strSql = "SELECT * From TableName " & _
"Where FieldName Between " & _
strDate1 & " AND " & strDate2

Adodc1.RecordSource = strSql
Adodc1.Refresh

[takkhal]

سلام
میتونی از کدی شبیه به این استفاده کنی



Dim T1$, T2$, T3$, Tt1$, Tt2$, Tt3$
T1 = Mid(text1, 1, 2)
T2 = Mid(text1, 4, 2)
T3 = Mid(text1, 7, 4)

Tt1 = Mid(text2, 1, 2)
Tt2 = Mid(text2, 4, 2)
Tt3 = Mid(text2, 7, 4)

Dim Mydate$
Dim i%, ii%, iii%
If T3 > Tt3 Then
For i = T3 To Tt3
For ii = 1 To 12
For iii = 1 To 31
Mydate = iii & "/" & iii & "/" & iii

'دستورات بررسی تساوی بانک
Next
Next
Next
End If



الته یه راه ساده تر هم وجود داره اونم اینه که تارخ رو به شکل زیر وارد کنی و بعد مثل یک عدد معمولی بزرگ و کوچیکشو مشخص کنی
13890121

[MohammadGh2011]

سلام عليکم
اين سورس (http://www.sourcegozar.com/?p=51) رو هم ببينيد.


موفق باشيد