مشکل با adodc

[hrj1981]

دوستان مشکل این کد کجاست؟

With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\dat\tolid.mdb;Jet OLEDB:Database Password=32357211;Persist Security Info=False"
.RecordSource = "select * from ch where cont= '" & "0" & "'and year= " & c1.Text
.Refresh
.Caption = .Recordset.RecordCount
End With

[ABERTINO]

من مشکلی تو این کد نمی بینم بگو ایرادی که می گیره چیه شاید بشه فهمید که چه مشکلی داره؟

[Hossein Bazyan]

دوستان مشکل این کد کجاست؟

With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\dat\tolid.mdb;Jet OLEDB:Database Password=32357211;Persist Security Info=False"
.RecordSource = "select * from ch where cont= '" & "0" & "'and year= " & c1.Text
.Refresh
.Caption = .Recordset.RecordCount
End With

سلام
این کد مشکلی ظاهرا نداره اما سه احتمال زیر هم را در نظر بگیر:

آیا متغییر cont رشته است یا عدد اگر عدد علامت ' را از طرفین بردار هر چند احتمال میدم عدد باشه !
بین علامت ' و and یک فاصله بذار
خیلی مواقع آخرین حرف خروجی app.path علامت \ میشود که اگر اینطور باشد با علامتی که خودت گذاشتی دو تا میشود پس app.path را کنترل کناگر حل نشد مشکلت از جای دیگری است