(06-03-22, 09:36 AM)Mostafa201255411 كتب : ممكن بعد الربط عمل اكسس 2000 ويشتغل معاك مع مرعاه مسح المسار
كود :
Dim x as string
x = app.path & "\db1.mdb" متغير مسار قاعدة البيانات
Set db = OpenDatabase(x) فتح قاعدة البيانات
(x) متغير لمسار قاعـــدة البيانــــات
(db1) اســــــم قاعـــدة البيانـــات
بالنسبة لامتداد قاعدة البيانات من 2003 فما تحت (mdb)
2007 فما فوق ... 2010 - 2013 - 2014 - 2016 (.accdb)
إذا طُعِنتَ من الخلفِ فاعلمْ أنك في المقدمةِ