:.:مفاجأه::عايز تخلي برنامجك يظهر اول ما تفتح الكمبيوتر ادخل::..

[الفرعون المحترف]

السلام عليكم
انا بتاع الجديد .. انا بتاع منتدى العملاقه..انا ليكوا..انتم وبس
تحت امركم ..اسعاعدكم بما استطعت..واعطيكم ما احببت..
شعر حلو صح..ههههههههههطيب عايز تخلي برنامجك يشتغل في startup
Imports Microsoft.Win32
Imports System.Windows.Forms

Public Sub RunatStartup(ByVal PutAtStartup As Boolean , ByVal ProgramName As String)
Dim StartupPath As String = "Software\Microsoft\Windows\CurrentVersion\Run"
Dim MyKey As RegistryKey = Registry.CurrentUser.OpenSubKey(StartupPath , True)

If PutAtStartup Then
MyKey.SetValue(ProgramName , Application.ExecutablePath)
Else
Try
MyKey.DeleteValue(ProgramName , False)
Catch ex As Exception
ex = Nothing
End Try
End If

End Sub

[veto_44]

بارك الله فيك احمد دائما كثير العطاء باذن الله
يستفيد من هذا الكود اكبر قدر من الاعضاء
دمت برعاية الله وحفظه .

[Ahmed_ghanam]

مشكور على الكود الجميل يا امير الشعراء هههههههههههه

[الفرعون المحترف]

بارك الله فيك اخي محمود
شكرا لك

[الفرعون المحترف]

بارك الله فيك اخي احمد
شكرا لكم على المرور

[ahmed ksnv]

ياه اتاري المسافة اللي أنا بعملها زيادة هي الغلط
مشكور أخي أحمد

[الفرعون المحترف]

اسخه والصقه كما هو في fourm_load