ايران ويج

شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.

سلام

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

کد: 
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

متشكرم

وبلاگ من

ايران ويج

nazlo