30rabi
دوشنبه 26 اردیبهشت 1390, 09:58 صبح
با سلام خدمت اساتید محترم
من میخوام یک عبارت رو جستجو کنم اما خطا میده این هم کدهاش:
Dim db As Database
Dim rs As Recordset
Dim a, b As String
a = "EmployeeIntro"
Set db = OpenDatabase("E:\vbproject\a\pay.mdb")
Set rs = db.OpenRecordset(a, dbOpenTable)
c = Form1.MSFlexGrid2.Row
Form1.MSFlexGrid2.Row = c
Form1.MSFlexGrid2.Col = 0
b = Form1.MSFlexGrid2.Text
"'"&rs.FindFirst "Name='" & b
اگه میشه بگید کجا مشکل داره چوه خطای عملیات رو میده. در ضمن اگه میشه به طور کامل بگید چطوری میشه از متد find برای جستجو استفاده کرد
من میخوام یک عبارت رو جستجو کنم اما خطا میده این هم کدهاش:
Dim db As Database
Dim rs As Recordset
Dim a, b As String
a = "EmployeeIntro"
Set db = OpenDatabase("E:\vbproject\a\pay.mdb")
Set rs = db.OpenRecordset(a, dbOpenTable)
c = Form1.MSFlexGrid2.Row
Form1.MSFlexGrid2.Row = c
Form1.MSFlexGrid2.Col = 0
b = Form1.MSFlexGrid2.Text
"'"&rs.FindFirst "Name='" & b
اگه میشه بگید کجا مشکل داره چوه خطای عملیات رو میده. در ضمن اگه میشه به طور کامل بگید چطوری میشه از متد find برای جستجو استفاده کرد