منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مساعدة في كود البجث
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
عمل  برنامج على  فيجوال بيسك 6 مربوط  مع  اكسس 2007  ولكن  المشكلة  في  البجث حيث  تظهر  لي  الرسالة  التالية








(  compile error:
method or data  member not found )

الرجاء المساعدة  في  حل  المشكلة  معل  العلم  مرفق  صورة  من  البرنامج  
gggggggggggg

If TextBox2.Text <> "" Then
Dim see As New OleDbCommand("SELECT per_id as [Serial], [shipment_id] as [Shipment No], date as [Date], shipping_com_id as [Shipping Company], Staff_ID as [Staff ID] , [Staff_name] as [Staff Name], Staff_namea as [Arabic Name] , Comment as [Comment] FROM [Registeration] WHERE [shipment_id] = '" & TextBox2.Text & "'", DBconnection)
Dim adap As New OleDbDataAdapter
Dim dt As New DataTable
Dim sou As New BindingSource
adap.SelectCommand = see
adap.Fill(dt)
sou.DataSource = dt
DataGridView1.DataSource = sou
adap.Update(dt)
adap.Dispose()
see.Dispose()
end if


هذا كود البحث حقي وهو يعرض النتائج في داتا جرد فيو
Private Sub Command2_Click()
Dim gFind As String, gBookMark As Variant
gFind = InputBox("Find What : ", "Search")
If Trim(gFind) = "" Then Exit Sub
'End If
gBookMark = rs.Bookmark
rs.Find "[الاسم] = '" & Trim(gFind) & "'", 0, adSearchForward, 1
Exit Sub
Call openconnection
With rs
.ActiveConnection = con
.CursorType = adOpenDynamic
.CursorLocation = adUseClient
.LockType = adLockOptimistic
.Open "select * from [دليل الاسواق]"
End With
End Sub
اخي انا لدي قاعدة بيانات في اكسس2007 جربت هذا الكود ولم يعمل ارجوا المساعدة في حل المشكلة