انشاء نسخة احتياطية لقاعدة مرتبطة محمية بكلمة سر

[محمد القدسي]

السلام عليكم

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

والسؤال كيف اجعله ينشئ نسخة احتياطية لقاعدة الجداول وليس القاعدة التي فيها الجداول المرتبطة

ارجو ان اكون وفقت في شرح مطلوبي 

والسلام عليكم

buckup.rar

[محمد القدسي]

للرفع اخواني 

او احد يدلني على رابط في هذا المنتدى المبارك يدل على موضوعي

[kanory]

هذه امثلة مشابه في الموقع

في ١٨‏/٩‏/٢٠١٥ at 23:27, ابوخليل said:

السلام عليكم

اسمحوا لي بالمشاركة معكم

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

يتم اخذ النسخة عند اغلاق النموذج / انظر المرفق

Dim DBOld As String
 Dim DBNew As String
Private Sub Form_Load()
DBOld = CurrentProject.Path & "\Data.mdb"  'اختيار قاعدة بيانات الجداول
DBNew = CurrentProject.Path & "\Backup"  'اختيار مكان حفظ النسخة
End Sub
Private Sub Form_Close()
On Error Resume Next
Shell "cmd.exe /C copy " & """" & DBOld & """" & " " & """" & DBNew & "\" & "Data.mdb" & """", 0
End Sub

xxxx.rar

 

[محمد القدسي]

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

[محمد القدسي]

للرفع اخواني الله يبارك فيكم هل طابي غير واضح او حتى دلوني على رابط يخص موضوعي

[أبو آدم]

قيد العمل

[أبو آدم]

الاخوة الفضلاء

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

ضمن الاجراءات حذف اي قاعدة بيانات في مجلد النسخ الاحتياطية ( يحمل نفس الاسم )

التطبيق أظنه يغني عن الشرح

و حال لزوم الشرح نقوم بذلك ان شاء الله

و الله من وراء القصد ...

BE BackUp & PW.rar

[ابوآمنة]

شكراً لك أبو آدم 

بارك الله في جهودك المبدعة 

هل في مجال للشرح جزيتم خيراً ؟

[محمد القدسي]

اشكر الاستاذ ابو ايمن على تعاونه

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

اما ما تكرمت به فانه يقوم بعمل نسخة للجداول الحالية التي فيها النماذج  كما في المرفق الاتي اريد نسخ لقاعدة Expor  عن طريق القاعدة  ☺ Create New DB And Expor Tables  With Password ☺

واريدها تكون محمية

بمعنى اخر المرفق التي تفضل به كيف لو كانت الجداول مرتبطة فانه سينسخ الجداول مرتبطة كما هي 

ارجو ان يكون شرحي لسؤالي مفهوم

والله اسأل ان يبارك في جهودكم 

 

buckup.rar

[sofiane05552]

13 ساعات مضت, أبو آدم said:

الاخوة الفضلاء

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

ضمن الاجراءات حذف اي قاعدة بيانات في مجلد النسخ الاحتياطية ( يحمل نفس الاسم )

التطبيق أظنه يغني عن الشرح

و حال لزوم الشرح نقوم بذلك ان شاء الله

و الله من وراء القصد ...

BE BackUp & PW.rar

بارك الله فيك استاذ

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

 

 

[أبو آدم]

يا اخي محمد 

التطبيق لا ينسخ القاعدة الحالية ، التطبيق ينسخ اي قاعدة تشاء ، والنسخة محمية بكلمة سر

رجاءا تمعن قليلا بالمرفق قبل الرد ، ما ارفقته هو تطبيق حرفي ( تفصيل) لما طلبته ، ويمكنك تغيير الاسماء لقواعد البيانات في الكود لتتوافق مع تطبيقك.

هناك قاعدة بيانات في المجلد تمثل BE التي تسميها القاعدة الخلفية ، وهنا اسمها Data.accdb

هناك مجلد لحفظ النسخة الاحتياطية اسمه Backup

و انت تعمل ضمن القاعدة NA_Backup_BE_and_set_Password التي تمثل FE  التي تحوي النماذج و غيرها

بالضغط على زر الامر Back Up في النموذج ، يقوم بحذف اي نسخة احتياطية سابقة بنفس الاسم في المجلد Backup ، ثم ياخذ نسخة احتياطية من القاعدة Data ويسميها DataX.accdb و يحفظها داخل المجلد Backup ، ثم يتم حماية القاعدة DataX.accdb بكلمة سر هي 123 .

وجميع هذه المراحل وضحتها في التطبيق بموجب رسائل.

اذا قمت بتشغيل القاعدة Data تعمل بشكل عادي

اذا قمت بتشغيل القاعدة DataX تطلب كلمة سر ، استخدم 123 

 

 

[kaser906]

في ٥‏/٢‏/٢٠١٨ at 14:19, أبو آدم said:

الاخوة الفضلاء

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

ضمن الاجراءات حذف اي قاعدة بيانات في مجلد النسخ الاحتياطية ( يحمل نفس الاسم )

التطبيق أظنه يغني عن الشرح

و حال لزوم الشرح نقوم بذلك ان شاء الله

و الله من وراء القصد ...

BE BackUp & PW.rar

الله يعطيك العافية استاءنا ابو آدم

[محمد القدسي]

اتقدم بالاعتذار اولا لاخي واستاذي ابي ادم لاني اولا اخطأت بكنيته حيث قلت ابو ايمن

وثانيا اخطأت في تجميلي للمرفق الخاص به حيث قمت بفتح مرفقي وظننته انه له

وثالثا اشكره على هذا المرفق والذي فيه ما اردت وهنيئا له ابداعه ولا فخر

ورابعا اشكره واشكر كل من يتعاون معنا في هذا المنتدى المبارك والله اسال ان يجعل ما تقومون به في ميزان حسناتكم يوم القيامة

[أبو آدم]

أحسن الله اليك أخي محمد

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

ما نقوم به هو لوجه الله تعالى ، لا نبتغي عليه أجرا و لا شكورا ، ولكن شكركم لله ، فمن لا يشكر الناس لا يشكر الله

و ما امامنا و امامكم ، الا علم يجول بيننا وبينكم مما علّمنا الله ، و ان كان فيه ما لا تعلمونه فقد علمتموه بفضل من الله ، ان كنت فيه مسخرا او كان غيري ، فالحمد لله

جعلها الله لنا و لكم حلقات علم طيبات تحفها رحمة الله و رضاه

و حياكم الله ...