تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود تشغيل البرنامج مع بدء التشغيل
#1
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(ProductName, Application.ExecutablePath & " hide")
    End Sub

    Private Sub Form1_Shown(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Shown
        For Each s As String In My.Application.CommandLineArgs
            If s.ToLower.StartsWith("hide") Then

                Exit For
            End If
        Next
    End Sub
[صورة مرفقة: 36d06db82ef521f.gif]
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

الرد }}}
#2
شباب سلام بتمني إنو إلواحد لما يكتب الكود يوضح مكان تنزيله
الرد }}}
تم الشكر بواسطة:
#3
(13-02-20, 01:42 PM)ابراهيم عمر ابراهيم كتب : شباب سلام بتمني إنو إلواحد لما يكتب الكود يوضح مكان تنزيله

Form1_Load
الرد }}}
تم الشكر بواسطة:
#4
ممكن كود الغاء الاقلاع التلقائي
الرد }}}
تم الشكر بواسطة:
#5
قم باضافة اداة تشم بكس للكود أعلاه واعمل شرط
اذا true ..اقلاع تلقاىي
قناتنا على اليوتوب
الرد }}}
تم الشكر بواسطة: أبووسم
#6
في Visual Basic .NET يمكنك إضافة البرنامج إلى مفاتيح التسجيل في Windows لتشغيله تلقائياً عند بدء التشغيل. هذا يتطلب تعديل سجل النظام باستخدام مكتبة
كود :
Microsoft.Win32
. إليك كيفية القيام بذلك:

PHP كود :
Imports Microsoft.Win32

Public Class Form1
    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        Dim regKey 
As RegistryKey Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run"True)

 
       If regKey.GetValue("MyApplicationName"Is Nothing Then
            regKey
.SetValue("MyApplicationName"Application.ExecutablePath)
 
       End If
 
       regKey.Close()
 
   End Sub
End 
Class 

في هذا المثال، يتم فتح المسار
كود :
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run
في سجل النظام. ثم يتم التحقق مما إذا كان مفتاح تشغيل البرنامج "MyApplicationName" موجود بالفعل أم لا. إذا كان غير موجود، يتم إنشاؤه وتعيين مسار التطبيق
كود :
Application.ExecutablePath
كقيمة لهذا المفتاح.

يجب أن تحلّل اسم التطبيق "MyApplicationName" وفقًا لاسم التطبيق الخاص بك. كما يجب التأكد من الحصول على الصلاحيات الكافية لتعديل مفاتيح التسجيل على النظام.
الرد }}}
تم الشكر بواسطة:
#7
الكود الذي قدمته لديه بعض المشكلات. فيما يلي الكود المصحح


PHP كود :
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
    
' الطريقة الأولى: باستخدام My.Application.Info.AssemblyName
    Dim keyName As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
    Dim valueName As String = My.Application.Info.AssemblyName

    ' 
الطريقة الثانيةباستخدام ProductName
    
' Dim keyName As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
    ' 
Dim valueName As String ProductName

    Dim registryKey 
As Microsoft.Win32.RegistryKey _
        Microsoft
.Win32.Registry.LocalMachine.OpenSubKey(keyNameTrue)

 
   If registryKey Is Nothing Then
        registryKey 
Microsoft.Win32.Registry.LocalMachine.CreateSubKey(keyName)
 
   End If

 
   ' تعيين قيمة التسجيل لتشغيل البرنامج عند بدء التشغيل
    registryKey.SetValue(valueName, Application.ExecutablePath & " hide")
    registryKey.Close()
End Sub

Private Sub Form1_Shown(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Shown
    For Each s As String In My.Application.CommandLineArgs
        If s.ToLower.StartsWith("hide") Then
            ' 
قم بإخفاء النافذة إذا كانت السطر الأول يبدأ بـ "hide"
 
           Me.Hide()
 
           Exit For
 
       End If
 
   Next
End Sub 
في هذا الكود، يتم تعيين القيمة في التسجيل باستخدام اسم التطبيق (
كود :
My.Application.Info.AssemblyName
) أو باستخدام
كود :
ProductName
(حسب تعليقك في الكود). يتم فحص إذا ما كان المفتاح قد تم إنشاؤه بالفعل، وإذا لم يكن كذلك، يتم إنشاء المفتاح.
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Star [كود] كود مع مثال لجعل البرنامج يعمل بالتاريخ الهجري او الميلادي بغض النظر عن تاريخ الجهاز sendbad100 37 29,376 18-04-24, 10:57 AM
آخر رد: فتحي نهار الدليمي
  [كود] انشاء المسارات وتمرير البارامترات لها وقت التشغيل سعود 0 1,267 03-09-22, 12:51 AM
آخر رد: سعود
  كيفية عمل شاشة تحميل البرنامج بطريقة اجمل من ال Progress bar Saly nor 0 2,493 12-04-22, 04:20 AM
آخر رد: Saly nor
  منع تشغيل اكثر من نسخة للتطبيق (السهل اللذي كنت اظنه صعبا) سعود 2 2,749 02-02-21, 05:22 AM
آخر رد: سعود
  حل مشكلة دقة الشاشة مع البرنامج و التقارير Vb.net Reports RDLC Scaling Problem محمود بكرى 5 4,437 20-03-20, 12:40 AM
آخر رد: Alhootti1
  [VB.NET] تشغيل قاعدة البيانات التي على السيرفر من اي جهاز على الشبكة ahmed saleh 4 6,724 10-03-19, 09:49 AM
آخر رد: معتز حسن
Exclamation [سؤال] اريد كود او الطريقة التي تشغل البرنامج اوتوماتيك عند تشغيل الجهاز YousefOkasha 3 4,321 24-04-18, 05:30 PM
آخر رد: moniam
Smile كود حصري لجعل البرنامج لا يعمل أكثر من مرة للمستخدم YousefOkasha 2 4,423 01-02-18, 11:50 AM
آخر رد: طالب برمجة
  [كود] تصدير واستيراد إعدادات البرنامج @@أبورائد@@ 10 10,580 04-07-17, 07:32 PM
آخر رد: Mina Botros
  اريد تحزيم البرنامج بعيدا عن مشاكل الفريمورك بحيث يشتغل في اي جهاز ماهي الطريقة samirzaima 3 4,457 09-05-17, 09:30 PM
آخر رد: Ratchinko

التنقل السريع :


يقوم بقرائة الموضوع: