منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيفية نسخ قاعدة بيانات جديدة وباسم في هذا المثال
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كيفية نسخ قاعدة بيانات جديدة وباسم في هذا المثال
[attachment=19817]
(12-10-18, 09:56 PM)khezzani كتب : [ -> ]كيفية نسخ قاعدة بيانات جديدة وباسم في هذا المثال


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

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

هذا كود الحذف للقاعدة القديمة  وطبعا استبدل المسار كما تريده انت
كود :
Kill App.Path & "\Data\SuperMarket.mdb"
وهذا كود نسخ القاعدة الفارغة لمكانها الجديد
كود :
FileCopy App.Path & "\Data\DBSaved\SuperMarket.mdb", App.Path & "\Data\SuperMarket.mdb"
اما اذا كنت تريد انشاء قاعدة بيانات بتصميم مختلف كل مرة
فهذا شرحه يطول وليس عندي مثال الان ارسله لك
وإن شاء الله يفيدك الاخوة الكرام
بارك الله فيك اخي  [b]عبدالله الصافي  [/b]


نريد انشاء قاعدة بيانات فارغة وتكون بنفس التصميم في كل مرة ننشئها 
وباسم جديد تكتب في التكست بوكس 
وتحفظ في المسار التالي :App.Path & "\Dossier

[attachment=19848]
اهلا بك
هذا مثال عليك الاستفادة منه
create database