منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغات البرمجة الاخرى > قسم لغة vb6.0 > قسم أسئلة vb6.0 > كيف أجعل برنامجي يشتغل مباشرة عند اشتغال الوندوز
نسخة كاملة : كيف أجعل برنامجي يشتغل مباشرة عند اشتغال الوندوز
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2 3 4 5

عبد العزيز البسكري

12-03-17, 02:22 AM
بارك الله فيك و لك أخي جورج لتلبية الطلب
أشكرك جزيل الشكر على نبلك و كرمك
كملاحظة عند التجربة لم أتمكن من فتح الملف يظهر لي هذا الخطأ لا أعلم سببه
إحتراماتي

مساعدة

12-03-17, 02:50 AM
حاولت تحويل الكود الى vb6 لعله يعمل، بالنسبة إلى VB.NET فهو يعمل

اتمنى التصحيح والتجربة واخبارنا بالنتيجة


في تحميل الفورم لقراءة السجل والتعليم على الأداة CheckBox إذا البرنامج مفعل في السجل
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
   Dim WScript As Object, key As String, value As String
   WScript = CreateObject("wscript.shell")
   key = "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\" & Application.ProductName
   On Error Resume Next
   value = WScript.RegRead(key)
   If Err.Number = 0 Then
       CheckBox1.Checked = True
   Else
       CheckBox1.Checked = False
   End If
   On Error GoTo 0
End Sub


هذا حدث التعليم على الأداة CheckBox للتفعيل أو التعطيل في السجل
كود :
Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
   Dim wscript As Object, key As String, value As String
   WScript = CreateObject("wscript.shell")
   key = "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName
   value = App.Path & "\" & App.EXEName & ".exe"
   If CheckBox1.Checked Then
       WScript.RegWrite(key, value)
   Else
       WScript.RegDelete(key)
   End If
End Sub



الكود يحتاج صلاحية مسؤول

الخير طهوري

12-03-17, 04:01 AM
[attachment=13484]
السلام عليكم

الأخ العزيز عبد العزيز تأكد أن Module de classe محمل ضمن


صفحة الفورم (إذا لم يكن محملا فأضفه)
أضيف هنا الملف التنفيذي

أخي الحبيب مساعدة سوف أحاول التعديل على الكود في وقت لاحق إن شاء الله متى سنحت لي الفرصة
نحياتي Heart

عبد العزيز البسكري

12-03-17, 04:11 AM
أخي جورج كيف أحمل الموديل و من أين أضيفه لو سمحت ..لم أجده بالمشروع !!؟؟

الخير طهوري

12-03-17, 04:18 AM
(12-03-17, 04:11 AM)عبد العزيز البسكري كتب : [ -> ]
أخي جورج كيف أحمل الموديل و من أين أضيفه لو سمحت ..لم أجده بالمشروع !!؟؟

اتبع المسار التالي:
  projet----->Ajouter un module de classe----->Existant 
تجده في نفس المجلد حيث يوجد البرنامج
إذا لم تجده ها أنذا أحمله لك في المرفقات
بالتوفيق Heart

sendbad100

12-03-17, 05:12 AM
السلام عليكم ورحمة الله وبركاته


رغم اني اتابع المنتدى باستمرار فاتني متابعتكم في هذا الموضوع


شكراً لكم اخواني الاستاذ/ عبدالعزيز ووالاستاذ / جورج الله يعطيكم الف عافية ما قصرتم

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

الله يعطية العافية ويزيده صحةوعلماً... ويكتب له الاجر على كل ما يقدمه .

عبد العزيز البسكري

13-03-17, 09:12 PM
السّلام عليكم و رحمة الله و بركاته
أرجو المعذرة أخي الكريم " جورج  " عن التأخر بالرد لأنّي بالواقع فكّرت أوّلاً بمراجعة الموضوع و المحاولة فيه ثم أخبرك بنتيجة محاولاتي
للأسف يا غالي لم أتمكّن من ترتيب الملف كلّه على بعضه خاصّة مع MODULE DE CLASSE و توابعه التي حيّرتني
لو أمكن عزيزي لمّا يكون لديك متّسع من الوقت و تسمح ظروفك أن تجهّز لي ملف يحتوي على خلاصة المحاولات و لو بعد شهر حسب ما تسمح به ظروفك
بارك الله فيك و لك و جزاك خير الجزاء مقدّمًا
فائق الاحترامات

الخير طهوري

14-03-17, 01:12 AM
[attachment=13499]
السلام عليكم

نزل الملف المرفق
شغل الملف السابق startup حتى يتم تسجيل الملف test الصورة في الريجيستر
الأن شغل البرنامج supprimer2 واختر    HKEY_CURRENT_USER
فيظهر في التكست الكبيرة  مسار الملف test اضغط عليه لتحديده
وأخيرا اضغط على الزر " حذف قيمة أو مفتاح من السجل" ثم أعد تشغيل  البرنامج وكرر نفس الخطوات سوف تلاحظ أن الرابط قد اختفى من السجل.
لقد أضفت الموديل إلى المشروع وسوف تشاهده مع الفورم فوق صفحة الخصائص وتجد هذا الموديل في نفس المجلد وبإذن الله سوف يشتغل
لأي استفسار أنا تحت أمركم
تحياتي القلبية
ودعواتكم بظهر الغيب
Heart

الخير طهوري

14-03-17, 11:22 PM
أين أنت يا عبد العزيز؟

هل تم استيعاب الموضوع أم مازال فيه إشكال؟

عبد العزيز البسكري

15-03-17, 12:26 AM
(14-03-17, 11:22 PM)جورج190 كتب : [ -> ]أين أنت يا عبد العزيز؟

هل تم استيعاب الموضوع أم مازال فيه إشكال؟


السّلام عليكم و رحمة الله و بركاته
أنا معك على طول الخط أخي الغالي و صديقي الحبيب " جورج 190 " .. و أتابع باهتمام و بإلمام كل المواضيع
أشتغل على وينداوز 8 منذ أكثر من سنتين .. و لا يمكنني تغييره ولو بوينداوز 1000
فقط مشروعي الصغير الخاص يشتغل على وينداوز 8 تمام التّمام و لله الحمد و الشّكر
نقلت المشروع كملف تنفيذي لجهاز آخر به وينداوز 7 .. فيعلق البرنامج بأوّل فورم SPLASH و لا يستمر بالاشتغال أبدًا
قمت منذ البارحة بتحميل وينداوز 7 لتجربة الاشتغال على الملف بجهازي و محاولة إكتشاف الخطأ عن قرب فاكتشفت أنّ هذا الوينداوز 7 ..WINDOWS 7 ULTIMATE SP1 لم أستطع به إضافة مكتبة Common Control 2.6.0 و بذلك أصبح ال Progressbar و Statusbar أمنيتي الوحيدة في رؤيتهما و قلت ربما هما السبب في عدم إشتغال البرنامج
حكيت لك قصة معاناتي هذين اليومين .. و تسطيب هذا الوينداوز و حذف الآخر .. و وصول التحميل ل 80 أو 90 بالمئة و ينقطع النت أو التيّار .. و ما شابه ذلك من المطبّات
عزيزي يا غالي حكيت لك فقط لكي تعلم أنّي خارج التغطية لأنّي تقريبا لم أستقر على تسطيب أي وينداوز أشتغل عليه و ارتّب عليه أموري و لذلك لم أتمكن من الرّد و المشاركة بموضوعك
فائق الإحترامات
الصفحات : 1 2 3 4 5
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم لغات البرمجة الاخرى > قسم لغة vb6.0 > قسم أسئلة vb6.0 > كيف أجعل برنامجي يشتغل مباشرة عند اشتغال الوندوز