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

UP

UP :(

على الأقل جواب على هذه الفقرة

>

كيف أظهر رسالة

بالمحاول فيما بعد لأنشغال القاعدة أو لاستخدامها من شخص آخر على الشبكة ..

<

اخي العزيز

ارجو الانتظار فيمكن يكون الأعضاء مشغولون عنك قليلاً

ولكن لو بحثت لوجدت في المنتدى الاجابة

شكرا لمرورك أخ الفوارس2000

وكلامك صحيح .. بحثت ووجدت طرق النسخ الاحتياطية .. ولكن ليست كما أريد وهي عمل نسخ احتياطية وضغط القاعدة الموجوده

على السيرفر ؟؟ لأني لا أعلم أن كان هناك أحد يستخدم القاعدة ولا لا .. لكي أتم عليها عملية الضغط والنسخ .. أرجو أن يكون كلامي واضح

في الانتظار

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

اكسس ام SQL

وان شاء الله ما نقصر معك واذا تأخرت عليك فيرجى الانتظار لكوني مشغول بعمل برنامج

استخدم الأمر CopyFile قد يفيدك

مثال

CopyFile "اسم الملف المصدر","اسم الملف الجديد"

بعد ذلك قم بضغط قاعدة البيانات الجديدة

وشكرا

نوع القاعدة .... اكسس

وقد حاولت بخاصية CopyFile ثم ضغط القاعدة ... ولكن لا يتم نسخ القاعدة أثناء أنشغالها مع مستخدم آخر

كل .. ما أريده هو رسالة تخبرني بأن القاعدة مستخدمه حاليا ولا يمكنك ضغطها الآن .. بس هذا ما أريده

أخي إذا كنت تستخدم قاعدة بيانات Access ، ولديك شبكة فمن الأفضل أن تحول على SQL Server فهي أفضل في تعدد المستخدمين في الشبكة .

:rolleyes:

إلى هذه الدرجة معقده مع الاكسس... طيب ولي ما يعرف في SQL

السلام عليكم ورحمه الله وبركاته

اعتقد ان هذا اللينك سوف يساعدك فيما تحتاجه من sql

/index.php?showtopic=49735

فهو منقول من منتدى Microsoft SQL Server

اتمنى ان يفيدك

enjy

لماذا أنتم معقدون لهذه الدرجه .. سؤالي حول قاعدة الاكسس وسؤال واضح جدااا

حول رسالة تنبيهية عندما تكون القاعدة مشغوله أو مفتوحة من طرف آخر بينما

أجوبتكم وليس بأجوبة وأنما محاولات غير داله على نص السؤال .... ولا تمسه ..

كيف أصبحتم مبرمجين وأنتم لا تعرفون أن تجيبو على الأسئلة .. رجاء وليس عتاباً

الذي لا يعرف الجواب .. لايضع تخمينن من عنده .. ويدع من هم مختصون يقوم بالرد

أكرر سؤالي لمن يعرف .؟؟؟؟؟ وأنا في الأنتظار

يمكنك ذلك أخ vBsQ بستخدام كود تفحص القاعدة أذا كانت مفتوحة سابقا أم لا ومن ثما

أظهار رسالة تخبرك بما تريد

If dB.State = adStateClosed Then
  MsgBox "البرنامج مستخدم من قبل شخص آخر .. حاول ضغط القاعدة فيما بعد", vbCritical + vbOKOnly, "HnHn"
exit sub
end if

B)

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

وهذه هي الشفرة وتكتب في المديول وثم تستدعى

 Public Sub IsAppRunning()
  'HnHn : التأكد من عمل البرنامج
  If App.PrevInstance = True Then
    MsgBox "البرنامج مستخدم من قبل شخص آخر .. حاول ضغط القاعدة فيما بعد", vbCritical + vbOKOnly, "HnHn"
    Exit Sub
    End
  End If
End Sub

وطريقة الاستدعاء معروفة

call IsAppRunning

أنتهى .. B)

أتمنى أن يفيدك ما كتب

تشكر يا HnHn

الكود عمل معي 100 % وهذا هو المطلوب

vBsQ كتب:

لماذا أنتم معقدون لهذه الدرجه .. سؤالي حول قاعدة الاكسس وسؤال واضح جدااا

حول رسالة تنبيهية عندما تكون القاعدة مشغوله أو مفتوحة من طرف آخر بينما

أجوبتكم وليس بأجوبة وأنما محاولات غير داله على نص السؤال .... ولا تمسه ..

كيف أصبحتم مبرمجين وأنتم لا تعرفون أن تجيبو على الأسئلة .. رجاء وليس عتاباً

الذي لا يعرف الجواب .. لايضع تخمينن من عنده .. ويدع من هم مختصون يقوم بالرد

أكرر سؤالي لمن يعرف .؟؟؟؟؟  وأنا في الأنتظار

←

================================================

سبحان الله انت تحاول تأخذ معلومه وإلا تحاول انك تجرح الناس

-----------------------------------------------------------------

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

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

وبعدين : لما تقول الرجاء من الذي لا يعرف الجواب لا يخمن ؟؟؟ كيف تأتي المعلومه اخي بدون تخمين او تفكير

===========

عندما سألت كيف اصبحتم مبرمجون ؟؟؟؟ الجواب سهل وكله بالجد والاجتهاد ولكن لماذا لا توجه الى نفسك حيث وانك تريد ان يعملوا لك كل شيء جاهز .

وانا لم اكتب هذا التعليق محاماه عنهم ولكن يا اخي والله لانني اعرف لم يقصروا معك او مع غيرك

واولهم انا وليس بالضروره اذا لم يجيبوك عن اي موضوع لأي سبب كان تقوم تتضجر وتزعل

المنتدى من افضل المنتديات واعضاءه كلهم متعاونون افضل مما تتصور

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

وارجو ا تقدر ماقدموه وما يقدمونه لك ولغيرك

vBsQ كتب:

لماذا أنتم معقدون لهذه الدرجه .. سؤالي حول قاعدة الاكسس وسؤال واضح جدااا

حول رسالة تنبيهية عندما تكون القاعدة مشغوله أو مفتوحة من طرف آخر بينما

أجوبتكم وليس بأجوبة وأنما محاولات غير داله على نص السؤال .... ولا تمسه ..

كيف أصبحتم مبرمجين وأنتم لا تعرفون أن تجيبو على الأسئلة .. رجاء وليس عتاباً

الذي لا يعرف الجواب .. لايضع تخمينن من عنده .. ويدع من هم مختصون يقوم بالرد

أكرر سؤالي لمن يعرف .؟؟؟؟؟  وأنا في الأنتظار

←

================================================

سبحان الله انت تحاول تأخذ معلومه وإلا تحاول انك تجرح الناس

-----------------------------------------------------------------

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

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

وبعدين : لما تقول الرجاء من الذي لا يعرف الجواب لا يخمن ؟؟؟ كيف تأتي المعلومه اخي بدون تخمين او تفكير

===========

عندما سألت كيف اصبحتم مبرمجون ؟؟؟؟ الجواب سهل وكله بالجد والاجتهاد ولكن لماذا لا توجه الى نفسك حيث وانك تريد ان يعملوا لك كل شيء جاهز .

وانا لم اكتب هذا التعليق محاماه عنهم ولكن يا اخي والله لانني اعرف لم يقصروا معك او مع غيرك

واولهم انا وليس بالضروره اذا لم يجيبوك عن اي موضوع لأي سبب كان تقوم تتضجر وتزعل

المنتدى من افضل المنتديات واعضاءه كلهم متعاونون افضل مما تتصور

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

وارجو ا تقدر ماقدموه وما يقدمونه لك ولغيرك

اعتذر لكم جميعا ...

جزاك الله كل الخير أخى ابو اميره على كل ما قلته

وإن كان هناك أى تأخير في الرد على أى سؤال من أى أحد فإن هذا بسبب فترة الإمتحانات أو العمل أو أى ظروف

ويجب أن نعذر بعضنا

والله أعلم اننى فعلا إستفدت من هذا المنتدى جدا جدا جدا

أختكم enjy