PDA

View Full Version : نحوه استفاده از دستورات SQL



shar110
یک شنبه 15 آذر 1388, 19:48 عصر
با سلام
من يك فرم ساختم و در اون سه تا تكست گذاشتم و با دستور زير مي خواهم داده هاي وارد شده در اين تكستها را در ديتا بيس جستجو كنم


Set db = OpenDatabase(App.Path & "\Enter.loc")
Set rs = db.OpenRecordset("SELECT * FROM Enter_02 WHERE 001='" + Text1.Text + "' AND 002='" + Text2.Text + "' AND 005='" + Text3.Text + "'")


سه تا فيلد 001 و 002 و 005 در جداول ديتا بيس از نوع تكست هستن
ولي بعد از اجراي برنامه با خطا زير مواجه مي شم مشكل كجاست؟




Data Type Mismatch in Criteria expression

mpmsoft
یک شنبه 15 آذر 1388, 20:31 عصر
بجای + از & جهت بهم چسباندن رشته استفاده کنید


Set db = OpenDatabase(App.Path & "\Enter.loc")
Set rs = db.OpenRecordset("SELECT * FROM Enter_02 WHERE 001='" & Text1.Text & "' AND 002='" & Text2.Text & "' AND 005='" & Text3.Text & "'")