منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

اخواني استفسار لو تكرمتوا وارجوا منكم الرد وفقكم الله

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

كود :
Public Sub IsAppRunning()
 If App.PrevInstance = True Then
   MsgBox "البرنامج قيد التشغيل", vbExclamation + vbMsgBoxRtlReading
 End
 End If
End Sub
وعليكم السلام ورحمة الله وبركاته

جرب التالي

PHP كود :
Private Sub Form_Load() 
If 
App.PrevInstance True Then 
MsgBox 
"لا يمكن تشغيل أكثر من نسخة من البرنامج" 
Unload Me 
Exit Sub 
End 
If 
End Sub 

بالتوفيق .
يعطيكم العافية اخواني وماقصرتم الله يطرح فيكم وفي علمكم الخير والبركة
تم بنجاح
ودي وشكري للجميع
جزاك الله كل خير
عندي نفس المشكلة بلغة سي شارب
(30-08-20, 01:17 PM)Wwhw94 كتب : [ -> ]عندي نفس المشكلة بلغة سي شارب

http://vb4arb.com/vb/showthread.php?tid=36272
(28-02-18, 11:49 PM)مصمم هاوي كتب : [ -> ]ضع هذا الكود في مديول

كود :
Public Sub IsAppRunning()
 If App.PrevInstance = True Then
   MsgBox "البرنامج قيد التشغيل", vbExclamation + vbMsgBoxRtlReading
 End
 End If
End Sub
اخي العزيز
 السلام عليكم ورحمة وبركاته
هل يمكن استعادة النسخة المفتوحة بدل من الرسالة  وجزكم الله خيراً ؟؟
 تحياتي