الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

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

مغلق
بدأه mahaini في 30 نوفمبر 2004 · 3 رد · 605 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

إخواني الكرام

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

وإذا كان الرنامج شغال وحاولت تشغيل نسخة أخرى يظهر رساله تفيد بأنه لايمكن تشغيل أكثر من نسخة واحدة

حاولت استخدام هذا الكود

If App.PrevInstance = True Then 
MsgBox "لا يمكن تشغيل اثر من نسخه في نفس الوقت" 
End
End If

وهو شغال

ولكنه وبعد حوالي 3 ثواني يعطيني runtime error 401

ولكم جزيل الشكر

تم تعديل هذه المشاركة بواسطة mahaini في 30 نوفمبر 2004 في 01:23

#2

أخى الفاضل

الكود الذى كتبته صحيح ولا عيب فيه

أما الخطأ فأكيد له سبب آخر نتج عن إنهاء البرنامج

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

واعمل اصطياد للخطأ لتى أى جزء يسببه وفكر فى تجاوزه

هذا والله أعلى وأعلم

عن عبدالله بن عمر رضي الله عنهما أن رسول الله صلى الله عليه وسلم قال :

( أحب الناس إلى الله أنفعهم ، وأحب الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربة ، أو تقضي عنه دينا ، أو تطرد عنه جوعا ، ولأن أمشي مع أخي المسلم في حاجة أحب إليّ من أن اعتكف في المسجد شهرا ، ومن كف غضبه ستر الله عورته ، ومن كظم غيظا ، ولو شاء أن يمضيه أمضاه ، ملأ الله قلبه رضا يوم القيامة ، ومن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزل الأقدام ، وإن سوء الخلق ليفسد العمل كما يفسد الخل العسل )

رواه الطبراني في الكبير

#3

الكود صحيح 100% ،، تأكد من وجود ادوات تايمر شغالة علي الفورم وربما يكون فيها اكواد خطأ لذلك تنفذ بعد فترة فتظهر رسالة خطأ،، تأكيد من هذا الامر .

تحياتي

الإنسان الذي يقول بأنه لا يمكن عمل شيء يجب ألا يعيق مطلقاً الإنسان الذي يقوم بعمل ذلك الشيء.

إن تخطئ فأنت إنسان ... أما أن تلوم جهازك الكمبيوتر على خطأك فهذا أكثر إنسانية.

#4

شكرا لكم يا إخوان لقد كانت المشكلة من التايمر وتم حلها بايقافه من الخصائص وتشغيله عن طريق الكود

هذا الموضوع مغلق.

مواضيع مشابهة