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

[nazlo]

سلام

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

کد:

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


متشكرم

وبلاگ من