YAZSYS.COM, Pos, Pop, Point Of Sale إعلان لاصحاب المتاجر ... تحميل افضل واسرع واسهل نظام مبيعات ونقاط البيع انقر هنا
مشاريع برمجة متنوعة مفتوحة المصدر | مواضيع ودروس تعليمية
 
Search in Google
كود إضافة البرنامج إلى بدء التشغيل
mports 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
 
 

 
 
 
برنامج مبيعات ونقاط البيع وجرد المستودعات ومحاسبة خارطة الموقع