كيفية عمل نسخة احتياطية لقاعدة البيانات من خلال البرنامج
حيث اني استعمل هذا الامر ولكن يعطي خطأ
permission denied
وهذا بسبب استخدامي لل
Adodc control
بحيث تكن قاعدة البيانات مفتوحة فيعطي هذا الخطأ
Private Sub Cmd_Backup_Click()
CommonDialog1.DialogTitle = "Backup Name"
CommonDialog1.DefaultExt = "mdb"
CommonDialog1.ShowSave
FileCopy App.Path + "\hotel.mdb", CommonDialog1.FileName
End Sub
Private Sub Cmd_Backup_Click() rs_Admin_User.Close rs_Admin_Admin.Close conn_Admin.Close CommonDialog1.DialogTitle = "Backup Name" CommonDialog1.DefaultExt = "mdb" CommonDialog1.ShowSave FileCopy App.Path + "\hotel.mdb", CommonDialog1.FileName Call Form_Load End Sub
يا شباب انا منتظر الرد
بس بدي شي طريقة لاغلاق العلاقة مع قاعدة البيانات
بحيث انو استعمل ال
Adodc control
ولا اعرف كيف اغلقها
بينما عرفت كيف اغلق الاتصالات البرمجية
conn_Admin.Close
بس ال Adodc1 لا يوجد فيها خاصية الاغلاق
الرجاء المساعدة
اين هم اهل الخبرة
هنا برنامج كامل للأستاذ هيثم القلاف به خاصيه النسخ الاحتياطي دون الحاجه لاغلاق قاعدة البيانات :
http://uni.hiarab.net/showthread.php?t=6173
ملاحظه : النسخه التي تحتوي على ما تريده موجوده في الصفحه رقم 2
تحياتي لك
[/وسط]
مشكور أخي لنبهاني على الرابط
منتديات كوكب الكمبيوتر
لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية
عظيم أستاذى النبهانى
أعمل لدنياك كأنك تعيش أبداً وأعمل لأخرتك كأنك تموت غداً
أحفظ لسانك تصان كرامتك
-----------------
من مواضيعى بالمنتدى
جديد الباب الاول من كتابى المدخل الى قواعد البيانات
جديد دروس قواعد البيانات
الان حرك الماوس بواسطة الكيبورد
برنامج VB6 Projects Viewer مساعد المبرمجين
والله اخي النبهاني تكرم علينا اكثر مما طلبنا
لنشوف البرنامج عم نزله الان
شكرا جزيلا
اخي النبهاني الطريقة جميلة جدا واعتمدتها في برنامجي
بس تعطي نفس الخطأ اذا كانت قاعدة البيانات مفتوحة
الخطأ مرفق
شكرا شباب المشكلة حلت
وضعت النسخ الاحتياطي في فورم خاص وقبل ما افتحه
اعمل
unload for all opened form
فبذلك يكون انفصل اللإتصال بقاعدة البيانات
هذا الموضوع مغلق.