29-01-18, 11:15 PM
اريد كود او الطريقة التي تشغل البرنامج اوتوماتيك عند تشغيل الجهاز
14-06-18, 11:43 PM
كود :
Dim applicationName As String = Application.ProductName
Dim applicationPath As String = Application.ExecutablePath
Dim regKey As Microsoft.Win32.RegistryKey
regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
regKey.SetValue(applicationName, """" & applicationPath & """")
regKey.Close()15-06-18, 01:04 AM
كما اضاف الاخ mohamed haroon
ويمكن استخدام الكود نفسه على سطر واحد بهذا الشكل
كود اضافة البرنامج فى الريجستري
كود :
My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(Application.ProductName, Application.ExecutablePath)كود حذف البرنامج فى الريجستري
كود :
My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).DeleteValue(Application.ProductName)تحياتى لك
وتمنياتى لك التوفيق
15-06-18, 07:39 PM
شكرا لكم جميعا
15-06-18, 11:45 PM
الشكر لله
تحياتى لك
وتمنياتى لك التوفيق
16-06-18, 02:55 PM
مميز جدا شكرا لكم