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

نسخة كاملة : كود حصري لجعل البرنامج لا يعمل أكثر من مرة للمستخدم
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم أهل المنتدي ..
أقدم لكم الكود الحصري الذي لم يتم نشره من قبل على هذا المنتدى ..
الكود يعمل علي عدم فتح البرنامج الخاص بك أكثر من مرة للمستخدم ..
كود :
Private Sub Form_Load()
If App.PrevInstance = True Then
MsgBox "لا يمكن تشغيل أكثر من نسخة من البرنامج"
Unload Me
Exit Sub
End If
End Sub
و السلام عليكم و رحمة الله و بركاته
(31-01-18, 02:22 PM)YousefOkasha كتب : [ -> ]
السلام عليكم أهل المنتدي ..
أقدم لكم الكود الحصري الذي لم يتم نشره من قبل على هذا المنتدى ..
الكود يعمل علي عدم فتح البرنامج الخاص بك أكثر من مرة للمستخدم ..
كود :
Private Sub Form_Load()
If App.PrevInstance = True Then
MsgBox "لا يمكن تشغيل أكثر من نسخة من البرنامج"
Unload Me
Exit Sub
End If
End Sub
و السلام عليكم و رحمة الله و بركاته





وعليكم السلام ورحمة اللة وبركاته 
جزيت خيرا وبارك الله فيك

مجهود جميل منك اخي الكريم
ولكن ، بارك الله فيك ، يجب أن تلاحظ ان  الأكواد قديمة جداً ، وهي خاصة بلغة VB 6 وانت تطرح المشاركات في منتدى VB.NET

وهذة الاكواد لا تعمل على ال VB.NET.

كل التقدير لجهودك
في الدوت نت يتم عملها من خصائص المشروع
بحيث يتم التأشير على Make single instance application