مشکل این برنامه چیه ؟(جستجو بین دو تاریخ)

[maryamb]

این برنامه قراره بین دو تاریخ جستجو انجام بده و همه ی اسم ها ی بین دو تاریخ رو بیاره ولی نمی دونم ایرادش کجاست؟

[RezaS_1354]

همون برنامه خودته با يك مقدار تغيير اميدوارم مشكلت حل شده باشد .

[bobrus]

تغييرات لازم رو انجام دادم فقط توي بانكت فيلد تاريخت رو از نوع تكست كن و طولش رو 10 تا قرار بده جواب بده



Private Sub Command1_Click()
d1 = m1.Text
d2 = m2.Text
strsql = "select * from table1 where tarikh between '" & d1 & "' and '" & d2 & "' "
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + App.Path + "\db2.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * From Table1"
Set DataGrid1.DataSource = Adodc1
Adodc1.Recordset.Close
Adodc1.Recordset.Open strsql
DataGrid1.DataMember = "Table1"
DataGrid1.Refresh
End Sub

[ali_habibi1384]

البته با دستورات خود vb6 راحت تر هستش. شما می تونی بجای کل کدهایی که bobrus زحمت کشیدن نوشتن این دستور رو بنویسی:


adodc1.recordset.filter=("tarikh> '" & d1 & "' and tarikh < '" & d2 & "'")

[vahidm]

با سلام
جالب بگم من با دستور sql این کار رو می کنم کدی هم که نوشتم درسته ولی وقتی بین دو تاریخ جستجو می کنم تاریخ اول رو نمیاره یعنی اگر می زنم از تاریخ 1/1/1387 تا 20/2/1387 برام بیاره ولی از 2/1/1387 میاره هر چی هم کار کردم درست نمیشه از شما اساتید می خوام در این زمینه همکاری کنید .
این مشکل من مشکل چندین نفر دیگه هم هست .

[bobrus]

ببين اگه sql رو اينجوري بنويسي هم باز مشكل داري؟



strsql = "select * from table1 where tarikh >= '" & d1 & "' and tarikh <= '" & d2 & "'"

[vahidm]

سلام دوست عزیز بله همین رو نوشتم ولی کار نمی کنه
اصلا من موندم چرا؟؟

[ASKaffash]

با سلام
دوست عزیز لطفا کد کامل را قرار دهید وحتما نوع وسایز فیلدهای مرتبط وبکار رفته را اعلام کنید تا انشا الله کمک کنیم