مرة اخري عمل بك اب لقاعدة البيانات

Private Sub Form_Load()
Data1.Recordset.Close
FileCopy App.Path & "\databasename.db", App.Path & "\backup.db"
End Sub

الموضوع ليس الا عمل نسخة اخري من فايل ال database

السلام عليكم

اخي راكان الحنيطي

حزاك الله الف الف خير

ابراهيم الطيب

الخرطوم

بارك الله فيك

لكن يا أستاذ راكان ماذا لو أردنا أن نضغط النسخة الاحتياطية .... و نبغى نشفر الملف المضغوط بكلمة سر ؟ ؟؟