29-09-16, 12:33 PM
السلام عليكم ورحمة الله
إخواني الاعزاء أريد أعرف كيف أضيف جدول آخر أو جدولين في هاذا الكود
جزاكم الله كل خير
إخواني الاعزاء أريد أعرف كيف أضيف جدول آخر أو جدولين في هاذا الكود
جزاكم الله كل خير
كود :
()Private Sub Form_Load
Me.Left = (Screen.Width - Me.Width) / 2
Me.Top = (Screen.Height - Me.Height) / 2
"con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = " & App.Path & "\Data.mdb;Persist Security Info=False
rs.CursorLocation = adUseClient
rs.Open "select * from table1 ", con, adOpenDynamic, adLockBatchOptimistic
End Sub