مشكل اين كد چيه؟

[dastiary]

سلام

لطفا بفرماييد مشكل اين كد چيه؟

Private Sub Form_Load()

Label2.Caption = Date
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\a.mdb;"

Adodc1.RecordSource = "SELECT * FROM mytest where tarikh = '" & Label2.Caption & "'"
Adodc1.Refresh

End Sub

اين خطا رو ميده Data Type mismatch in criteria expresstion


متشكرم



[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

[hoseinquest]

خب فیلد تاریخ رو توی دیتابیس از چه نوعی انتخاب کردی؟ date/time یا text

[kbdfa]

من برنامه ات رو تست كردم فقط به خط آخر يعني Adodc1.Refresh ايراد ميگيره وقتي بر ميداري خطا نميده
امتحان كن اگه دوباره خطا داد حتما يه گزينه اي داري كه تعريف نشده اگه خواستي مطرح كن تا هم فكري كنيم.

[dastiary]

مشكل تو قسمت استرينگ هست :
تو اين قسمت: '" & Label2.Caption & "'" چونكه اگه بجاي اون مستقيما يك تاريخ بنويسيم مثل #2006/11/10# درست ميشه
ولي من ميخوام تاريخ رو از يك ليبل بگيره.

[Reticent]

از StrToDate استفاده کنید.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

ایلیا

[hoseinquest]

منم واسه همین پرسیدم نوع داده ای فیلد چیه دیگه

[dastiary]

سلام وتشكر از دوستان.
فهميدم.
اگر كد رو اينجوري بنويسيم مشكل حل ميشه.

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید