[عبدالله الصافي]

اذا كنت تريد انشاء قاعدة بيانات فارغة وتكون بنفس التصميم في كل مرة تنشأ فيها القاعدة
فقم بوضع نسخة من قاعدة البيانات الفارغة بمجلد البرنامج
وفي كل مرة تريد انشاء قاعدة بيانات فارغة اعمل حذف للقديمة او احتفظ بها بمجلد اخر
وانسخ قاعدة البيانات الفارغة بالمكان الذي تريد بالاسم الذي تريد

هذا كود الحذف للقاعدة القديمة  وطبعا استبدل المسار كما تريده انت

كود :

Kill App.Path & "\Data\SuperMarket.mdb"

وهذا كود نسخ القاعدة الفارغة لمكانها الجديد

كود :

FileCopy App.Path & "\Data\DBSaved\SuperMarket.mdb", App.Path & "\Data\SuperMarket.mdb"

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