+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : عايز أربط أكسيس مع فيجوال بيسك 6 (/showthread.php?tid=12440)
عايز أربط أكسيس مع فيجوال بيسك 6 - ashry3000 - 07-06-15
الساده الأعضاء والمشرفين
تحية طيبه وبعد
أرجو إيضاح طريقة الربط بين جداول الأكسيس والفيجوال بيسك 6
RE: عايز أربط أكسيس مع فيجوال بيسك 6 - ahmedabdelaliem - 08-06-15
السلام عليكم
اخي راجع هذا المثال
المثال
RE: عايز أربط أكسيس مع فيجوال بيسك 6 - sasao - 02-10-15
طريقة الرابط مع مكتبة ado
If cn.State = 1 Then cn.Close
'cn.Open "provider=microsoft.jet.oledb.4.0;data source=gymsys.mdb"
'rs.Source = "member"
'
'rs.ActiveConnection = cn
'rs.CursorType = adOpenKeyset
'rs.LockType = adLockOptimistic
'rs.CursorLocation = adUseClient
'rs.Open
طريقة الربط بمكتبة ال dao
Set db = OpenDatabase("gymsys.mdb
Set rs = db.OpenRecordset("member