الرجاء افادتى اريد كود يجعل البرنامج يعمل عند بدء التشغيل

أهلا بك في المنتدى أخي الكريم ..

مستقبلا إن شاء الله , يجب استعمال خاصية البحث قبل طرح المواضيع

عل كل حال ...

بالنسبة لبد التشغيل :

ضع زر أمر عنوان "ضبط البرنامج للعمل عند بدء التشغيل" , ولا تغير اسمه .. ثم ضع الكود التالي :

اقتباس

Private Function RegWrite(Key1, SValue As String)

Set WSHShell = CreateObject("WScript.Shell")

WSHShell.RegWrite Key1, SValue

End Function

Private Sub Command1_Click()

RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\notepad.exe", " path of the notepad"

End Sub

هذا الكود يقوم بتعريف دالة , للكتابة إلى محرر النظام Registry , ثم نستعملها لوضع قيمة تعلم الجهاز بتشغيل برنامجنا عند بدء التشغيل

هام : استبدال notepad.exe في الكود السابق , باسم برنامجك , مثلا drowing.exe مثلا يعني , ولا تنسى .exe

بالنسبة لوضع البرنامج جوار الساعة :

ابحث في المنتدى عن MBTry تجد اداة للأخ محمد سعيد , ومشروحة أيضاً

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

كلما وقع الحدث Form_Load يقوم البرنامج بإضافة 1 إلى قيمة مربع نص , وبالتالي ستعرف عدد مرات الدخول ,,, ثم تستخدم Winsock أو E-Mail لإرسالها لك من خلال البرنامج

ولو في أي غموض أخبرني

وجزاكم الله خيرا

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

سامحنى فى اسألتى الكثيره هو انا صممت برنامج على الفيجول بيسك ولكن البرنامج دون تنصيب لا يعمل بتنصيب وانا اريد عند الضغط عليه فى اى درايف فى الجهاذ على حسب حفظ المستخدم للبرنامج انا فعلت الطريقه التى ارشدتنى بها ولكن عند اعاده التشغيل فتح فولدر سيستيم الخاص بالويندوز

====================================================

توضيح

انا عندى برنامج وضعته فى اى مكان فى الجهاز انا عايز عند اعاده التشغيل يتم تشغيل البرنامج تلقائيا

ولك جزيل الشكر واذرنى على اسألتى الكثيره

RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\notepad.exe", app.path &"\" & app.exename & ".exe"