السلام عليكم أهل المنتدي ..
أقدم لكم الكود الحصري الذي لم يتم نشره من قبل على هذا المنتدى ..
الكود يعمل علي عدم فتح البرنامج الخاص بك أكثر من مرة للمستخدم ..
كود :
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