[Abdellah]

السلام عليكم ورحمة الله

إخواني الاعزاء أريد أعرف كيف أضيف جدول آخر أو جدولين في هاذا الكود 
جزاكم الله كل خير 

كود :

()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


 

[Abdellah]

شكرا أخي عمير على الجواب  فالجدول الذي أريد إضافته ليس فيه رواتب بل يحمل تواريخ وأسماء فأنا
أريد أن أعرف القاعدة العامة باستخدام مكتبة Dao لربط الاتصال  بثلاث جداول أوجدولين  أما جدول واحد من طبيعة الحال فالامر سهل وشكرا جزيلا