منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] ربط الفيجول بيسك6 بالاكسس2003 - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] ربط الفيجول بيسك6 بالاكسس2003 (/showthread.php?tid=1192)

الصفحات: 1 2 3

RE: ربط الفيجول بيسك6 بالاكسس2003 - الوفا - 14-12-13

في انتظار مساعدتكم رجاءءاااا؟؟؟؟ [size=large]

RE: ربط الفيجول بيسك6 بالاكسس2003 - VB_Coder - 16-12-13

السلام عليكم

كود :
'هنا يتم وضع أو تحديد مسار قاعدة البيانات على جهازك
Data1.DatabaseName = App.Path & "\student97.mdb"
'وهذا الأمر لتحديث أداة الداتا لكي يتم الإتصال بقاعدة البيانات التي حددنا مسارها أعلاه
Data1.Refresh

'هذا الأمر للإنتقال إلى أول سجل في قاعدة البيانات
Data1.Recordset.MoveFirst
'هذا الأمر للإنتقال إلى آخر سجل في قاعدة البيانات
Data1.Recordset.MoveLast

'لازم ننتقل إلى أول سجل ثم إلى آخر سجل في أداة الداتا على شان نقدر نعرف عدد السجلات
'الموجودة في الجدول

'هذا الأمر يجلب عدد السجلات الموجودة في الجدول ونضعه في متغير x
x = Data1.Recordset.RecordCount - 1

كود :
'هذا لكي تعرف إسم الحقل
Data1.Recordset.Fields(0).Name
'هذا لكي تعرف قيمة أو محتوى الحقل
Data1.Recordset.Fields(0).Value

كود :
Space(3)
- كلمة space هي لكي تطبع مسافة فارغة بعدد الرقم الموجود بين قوسين بعدها .

- المثال في المرفقات فيه البحث وبعض الشرح .

- تحياتي .

RE: ربط الفيجول بيسك6 بالاكسس2003 - الوفا - 17-12-13

اخي الكريم VB_Coder شكررررا جزيلا عالمساعده والشرح والطرق الجميله اشكرك كثيرااا وجزاك الله الف خيير وقد استفدت من حضرتكم كثيرا بارك الله فيكم........
وانا جداا اسفه على الاسئله الكثيره جزاكم الله خيرا

تحيااااااااااااااتي