منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - عايز البرنامج يشتغل مع بداية تشغيل الويندوز

بصمم برنامج اذان وعايز البرنامج يشتغل مع بداية تشغيل الويندوز فياريت الكود اللي يخليه يفتح مع بداية التشغيل

(05-12-15, 12:10 PM)مدحت زقزوق كتب : [ -> ]بصمم برنامج اذان وعايز البرنامج يشتغل مع بداية تشغيل الويندوز فياريت الكود اللي يخليه يفتح مع بداية التشغيل

تفضل

ضع هاذا الكود في زر

PHP كود :

My.Computer.Registry.SetValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run", Application.ProductName, Application.ExecutablePath) 

وشكرا

بعد اذن الاخ hassan
يمكن استخدامة بهذه الطريقة

كود :

       Try

            Dim regKey As Microsoft.Win32.RegistryKey

            If CheckBox5.Checked = True Then 'الاضافة ريجستري 

                regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True) ' مسارالريجستري

                regKey.SetValue(Application.ProductName, Application.ExecutablePath) 'اسم و مسار المشروع

                regKey.Close()

            Else    'الازالة الريجستري

                regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)

                regKey.DeleteValue(Application.ProductName, False)

                regKey.Close()

            End If

        Catch ex As Exception

        End Try

من بعد اذن الجميع
ضع البرنامج المنفذ في الستارت اب ...

(05-12-15, 09:48 PM)احمداحمداحمد6 كتب : [ -> ]من بعد اذن الجميع
ضع البرنامج المنفذ في الستارت اب ...

هل يوجد كود برمجي ؟؟؟؟؟؟؟؟؟

(05-12-15, 10:02 PM)hassan كتب : [ -> ]
(05-12-15, 09:48 PM)احمداحمداحمد6 كتب : [ -> ]من بعد اذن الجميع
ضع البرنامج المنفذ في الستارت اب ...

هل يوجد كود برمجي ؟؟؟؟؟؟؟؟؟

بالفعل استاذنا يوجد كود وبالفعل بعد التجربة يقوم بتشغيل البرنامج مع تشغيل الويندوز
المطلوب هو نسخ الملف النتفيذي للمشروع الى مجلد StartUp
وطبعا الملف التنفيذي يكون في مسار تشغيل البرنامج
فيكون الكود كالتالي والكود التالي يتم وضعه مع بداية البرنامج
اي يكون في حدث Form_Load في الفورم الرئيسية للبرنامج

في البدء يجب التحقق ان الملف غير موجود مسبقا لانه لو موجود سيحدث خطأ

PHP كود :

 ' اختبار هل الملف موجود ام لا
        If Not IO.File.Exists("C:\Users\[User]\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\[FileName.exe]") Then
            ' لو الملف غير موجود يقوم بنسخه من مسار تشغيل البرنامج الى مجلد StartUp
            IO.File.Copy(Application.StartupPath & "\[FileName.exe]", "C:\Users\[User]\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\[FileName.exe]")
        End If 

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

(06-12-15, 07:43 PM)أحمد النجار كتب : [ -> ]
(05-12-15, 10:02 PM)hassan كتب : [ -> ]
(05-12-15, 09:48 PM)احمداحمداحمد6 كتب : [ -> ]من بعد اذن الجميع
ضع البرنامج المنفذ في الستارت اب ...

هل يوجد كود برمجي ؟؟؟؟؟؟؟؟؟

بالفعل استاذنا يوجد كود وبالفعل بعد التجربة يقوم بتشغيل البرنامج مع تشغيل الويندوز
المطلوب هو نسخ الملف النتفيذي للمشروع الى مجلد StartUp
وطبعا الملف التنفيذي يكون في مسار تشغيل البرنامج
فيكون الكود كالتالي والكود التالي يتم وضعه مع بداية البرنامج
اي يكون في حدث Form_Load في الفورم الرئيسية للبرنامج

في البدء يجب التحقق ان الملف غير موجود مسبقا لانه لو موجود سيحدث خطأ

PHP كود :

' اختبار هل الملف موجود ام لا If Not IO.File.Exists("C:\Users\[User]\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\[FileName.exe]") Then ' لو الملف غير موجود يقوم بنسخه من مسار تشغيل البرنامج الى مجلد StartUp IO.File.Copy(Application.StartupPath & "\[FileName.exe]", "C:\Users\[User]\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\[FileName.exe]") End If

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

شكرا لك على هذه المعلومة

ماقصرت الله يعطيك العافيه