اخواني الاعزاء
شاكر لكم مساعدتكم سلفاً انا لدي برنامج بالفجول بيسك 6
فهل استطيع ان اجعل هذا البرنامج يعمل مع بدء تشغيل وندوز أم لا واذا كان ممكن ارجو ان تتفضلو علينا بالشرح ولكم جزيل الشكر والامتنان
اخواني الاعزاء
شاكر لكم مساعدتكم سلفاً انا لدي برنامج بالفجول بيسك 6
فهل استطيع ان اجعل هذا البرنامج يعمل مع بدء تشغيل وندوز أم لا واذا كان ممكن ارجو ان تتفضلو علينا بالشرح ولكم جزيل الشكر والامتنان
اجل يمكنك هذا من خلال تسجيل مفتاح في الـ Registry لملف الـ EXE للعمل عند بدأ التشغيل كبعض البرامج الاخرى , والكود التالي يقوم بهذا :
' ** Startup code ** ( كود تسجيل البرنامج للعمل عند بدأ النظام ) :
' add 2 command : ( command1 , command2 )
' in form :
'Function for RegWrite
Private Function RegWrite(Key1, SValue As String)
Set WSHShell = CreateObject("WScript.Shell")
WSHShell.RegWrite Key1, SValue
End Function
'Button to create the Startup Key
' زر تسجيل البرنامج للعمل عند بدأ التشغيل
Private Sub Command1_Click()
RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\App.EXEName", App.Path & "\" & App.EXEName
End Sub
'Button to delete the Startup Key
' زر الغاء تسجيل البرنامج للعمل عند بدأ التشغيل
Private Sub Command2_Click()
RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\App.EXEName", ""
End Sub
'\=============================================================
' *** ملاحظة :
' يمكن تسجيل اي برنامج للعمل عند بدأ التشغيل بالكود التالي :
' RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\book.exe", "C:\book.exe"
' * من السطر السابق : قم بإستبدال :-
' 1) ( book.exe ) بأسم البرنامج المراد تشغيله عند بدأ النظام
' 2) ( C:\book.exe ) بمساره
'\=============================================================ولكن استعمل الكود عندما تقوم بعمل ملف الـ EXE وبعد تسجيل المفتاح إذا تغير مكان البرنامج فلن يعمل وتحتاج لتسجيل المفتاح ثانياً
بالتوفيق ,,,
It does not matter what they know about you, but what you can do, so let your work speak of you
mmghv VB6 Programmer
اخي محمد
والله انا خلفتي في هذا الموضوع صفر
اذا كان بالامكان تساعدني بالشرح بالخطوات او الصور اكون لك شاكر
الله لايحرمك الاجر
كما ذكر الأخ محمد يمكنك استخدام كائن من النوع WScript.Shell وهذه أسهل الطرق
هذا هو الكود مختصرا
Dim WSHShell As Object
Private Sub Form_Load()
Set WSHShell = CreateObject("WScript.Shell")
WSHShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe", "REG_SZ"
End Subإن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
بعد اذن اخواني
اخي الكريم
هذه الطرق برمجية
وهناك طريقة سهلة جدا
اعمل shortcut لبرنامجك وضعه في:
start
programs
startup
ضع ال shortcut هنا وسيعمل البرنامج تلقائي ان شاء الله
بالتوفيق
:)
محتار!!! مش عارف شوتعمل؟؟! عندك مشاكل ونفسك تنحل؟؟!
عليك بالاقتراب من خالقك
عليك بصلاة الاستخارة
وعليك بالصدقة
داوو مرضاكم بالصدقة
ما نقص مال من صدقة
تصدقو ولو بشق تمرة
Magnom كتب:بعد اذن اخواني
اخي الكريم
هذه الطرق برمجية
طبعا هذه الطرق برمجية لأننا فى منتدى إسمه "الفريق العربى للبرمجة" :mad:
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
:lol:
اعصابك اخي الكريم :)
اعلم ذلك
ولكن ممكن سؤاله يكون دون النظر الى الطرق البرمجيه
اعذرني حبيبي
محتار!!! مش عارف شوتعمل؟؟! عندك مشاكل ونفسك تنحل؟؟!
عليك بالاقتراب من خالقك
عليك بصلاة الاستخارة
وعليك بالصدقة
داوو مرضاكم بالصدقة
ما نقص مال من صدقة
تصدقو ولو بشق تمرة
الاخ الحبيب
محمد مصطفى غريب
الاخ الحبيب
GHOST2010
الاخ الحبيب
Magnom
اسأل الله بمنه وكرمه ان يوفقكم اجمعين وان يجعلكم صالحين مصلحين وان يبارك في جهودكم وصحتكم واموالكم وابنائكم والا يحرمكم اجر التعليم 0كما اسأله جل شأنه ان يرفع قدركم ويعلي مراتبكم وان يوفقكم لعمل الخيرات 0
تم تعديل هذه المشاركة بواسطة ابو مرام في 4 فبراير 2010 في 11:39
بارك الله فيك
وجزاك عنا وعن المؤمنين كل خير
محتار!!! مش عارف شوتعمل؟؟! عندك مشاكل ونفسك تنحل؟؟!
عليك بالاقتراب من خالقك
عليك بصلاة الاستخارة
وعليك بالصدقة
داوو مرضاكم بالصدقة
ما نقص مال من صدقة
تصدقو ولو بشق تمرة
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…