تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تشغيل البرنامج مع الكمبيوتر
#1
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
كيف حالكم إخواني
إن شاء الله كلكم بخير
عندي سؤال بسيط
تشغيل البرنامج مع تشغيل الكمبيوتر
الان انا لدي برنامج يختفي بعد تشغيله
يبقى شغال في التاسك مانجر ولكن لا يظهر في التاسك بار
فكيف أجعل البرنامج يشتغل تلقائيا كلما قمت بإعادة تشغيل الكمبيوتر ؟؟؟
وأحلى تقيم ++++
في إنتظاركم Cool
الرد }}}}
تم الشكر بواسطة:
#2
اولا فى اعلى محرر الكود ضع هذا الكود
PHP كود :
Imports Microsoft.Win32 

هذا لبدء التشفيل مع الويندوز
PHP كود :
Try
                
Dim regkey As RegistryKey Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run"True)
                
regkey.SetValue(""Application.ExecutablePath)
                
My.Settings.Save()
            Catch
                
MsgBox("خطأ"MsgBoxStyle.Critical"")
            
End Try 

وهذا للايقاف

PHP كود :
Try
                
Dim regkey As RegistryKey Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run"True)
                
regkey.DeleteValue(""False)
                
My.Settings.Save()
            Catch
                
MsgBox("خطأ"MsgBoxStyle.Critical"")
            
End Try 
"الناس نيام فإذا ماتوا إنتبهوا"
الرد }}}}
تم الشكر بواسطة: ابو يوسف النواوي 2
#3
يا غالي ارجوا منك التأكد من الكود
عندما قمت بوضعه ظهرت لي 6 أخطاء !
الرد }}}}
تم الشكر بواسطة:
#4
ممكن تبعت الاخطاء حتى اعرف السبب؟
"الناس نيام فإذا ماتوا إنتبهوا"
الرد }}}}
تم الشكر بواسطة:
#5
تسلم يا غالي انا عرفت ايه المشكلة
المفروض إنك تحط الكود ده في الفورم لود
Form1_Load
الرد }}}}
تم الشكر بواسطة:
#6
اخى لقد وضعت لك الاكواد وانت تضعها فى اى حدث تريده.
وهى ليست مقصوره على حدث الForm1_Load
اخى جرب الاتى :-
1- اعلى محرر الكود ضع هذا الكود
كود :
Imports Microsoft.Win32

2- ضع على الفورم اداة CheckBox

3- فى حدث CheckedChanged تبع ال CheckBox

ضع هذا الكود كاملا
كود :
If CheckBox1.Checked = True Then
            Try
                Dim regkey As RegistryKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
                regkey.SetValue("", Application.ExecutablePath)
                My.Settings.Save()
            Catch
                MsgBox("خطأ", MsgBoxStyle.Critical, "")
            End Try
        Else
            Try
                Dim regkey As RegistryKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
                regkey.DeleteValue("", False)
                My.Settings.Save()
            Catch
                MsgBox("خطأ", MsgBoxStyle.Critical, "")
            End Try
        End If

وجرب البرنامج


وبالتوفيق ان شاء الله
"الناس نيام فإذا ماتوا إنتبهوا"
الرد }}}}
تم الشكر بواسطة: VanToM


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  خطأ عند تشغيل المشروع مع مكتبة DLL Nbras 3 67 منذ 9 ساعة مضت
آخر رد: Nbras
  تغير حجم شاشات البرنامج عند العمل على شاشات اخرى nassery99 3 77 16-10-17, 12:42 PM
آخر رد: silverlight
  مشكلة تظهر في البرنامج بسبب الداتا بيس اكسس khaled12345 2 59 16-10-17, 07:41 AM
آخر رد: khaled12345
  ما هي افضل طريقة لجعل البرنامج تجريبي محمود صالح 3 134 15-10-17, 11:32 PM
آخر رد: hoshosgost@yahoo.com
  [سؤال] ظهور البرنامج عند الضغط على رابط ابو روضة 4 90 14-10-17, 10:55 PM
آخر رد: ابو روضة
  ظهور البرنامج عند نسخ رابط ابو روضة 8 161 12-10-17, 02:47 PM
آخر رد: ابو روضة
Thumbs Up كيفية تشغيل وإغلاق الادوات الذكية لويندوز 7 عن طريق الكود رمضان محمد 6 901 11-10-17, 08:48 PM
آخر رد: رمضان محمد
  [VB.NET] عمل شاشة مؤقته تظهر عند تشغيل الفورم hglogtd 2 45 11-10-17, 07:36 PM
آخر رد: hglogtd
  [سؤال] رسالة خطأ بعد تنصيب البرنامج على جهاز آخر aftfm 1 58 09-10-17, 06:57 PM
آخر رد: Adrees
  [سؤال] استعراض حالة عمل البرنامج ابو روضة 7 189 08-10-17, 11:22 AM
آخر رد: ابو روضة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم