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

الصفحات : 1 2

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاتة

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

مثل برنامج ال IDM و Yahoo

والسلام عليكم ورحمة الله وبركاتة

مخفية بسيطة me.hide كفيلة بتلبية الطلب
اما التشغيل مع بدء النظام فايضا بسيطة

كود :

My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(ProductName, Application.ExecutablePath)

ولحذفه

كود :

My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).DeleteValue(Application.ProductName)

سعود كتب :مخفية بسيطة me.hide كفيلة بتلبية الطلب
اما التشغيل مع بدء النظام فايضا بسيطة

كود :

My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(ProductName, Application.ExecutablePath)

ولحذفه

كود :

My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).DeleteValue(Application.ProductName)

الف شكر علي ردك اخ سعود لكني لا اريدها هكذا انا اعرف هذة الطرق

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

لكن عند فتحة يفتح عادي جدا زي اي برنامج

لكن انا اريدة عندما يبدا مع الويندوز يشتغل لكن مخفي لا يظهر

وشكرا علي ردك مرة اخري

إقتباس :
لكن عند فتحة يفتح عادي جدا زي اي برنامج

لكن انا اريدة عندما يبدا مع الويندوز يشتغل لكن مخفي لا يظهر

العفو اخوي
هل جربت كود الاخفاء او ضبط الخاصية Visible = False

السلام عليكم ورحمة الله وبركاته

إن ما تشير إليه في الصور هي Windows services ولها برمجة بطريقة خاصة،
وحسب البرمجة ممكن تضع أيقونة في شريط المهام بجوار الساعة، ومنها تمكن وضع أمر فتح نافذة معينه.

السلام عليكم ورحمة الله وبركاته

سوف اعطيك مثال

برنامج Yahoo Messenger عند بدء التشغيل مع الويندوز فإنة يقون ايقونة فك في التاسكبار

انا اريد البرنامج هكذا عند الفتح ب Double Click بمعني اخر يضغط المستخدم كلك يمين ثم يختار Open فإن البرنامج يشتغل عادي جدا ويظهر

اما اذا كان يبدا مع الويندوز تظهر ايقونة فقط في التاسكبار

ومثل الصورة

السلام عليكم ورحمة الله وبركاته

إذا أردت عمل تطبيق ويندوز عادي يشبه عمل Windows services

أضف NotifyIcon إلى الفورم وضع له أيقونة وضع هذا الكود

PHP كود :

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Visible = False
        Me.ShowInTaskbar = False

    End Sub
    Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
        Me.ShowInTaskbar = True
        Me.Show()
    End Sub
    Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        e.Cancel = True
        Me.Visible = False
        Me.ShowInTaskbar = False
    End Sub

End Class 

السلام عليكم ورحمة الله وبركاته

السلام عليكم

استخدم الكود التالي كما هو (نسخ / لصق):

كود :

[align=left]Private Sub Form1_Load(sender As System.Object, 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(sender As System.Object, e As System.EventArgs) Handles MyBase.Shown

    For Each s As String In My.Application.CommandLineArgs

        If s.ToLower.StartsWith("hide") Then

            Hide()

            Exit For

        End If

    Next

End Sub 

[/align]

هناك مايسمى بال commands التي يستقبلها التطبيق عند بدء التشغيل مثلا بعض البرامج عندما تضغط على احد الملفات المرتبطه بها يرسل windows الى التطبيق command يخبرة فيها بان المستخدم يريد تشغيل هذا الملف ويمكن ان ترسل للتطبيق ال command الظاهر بالصوره مثلا /onboot او كما تحدده انت ثم تتعرف عليه من خلال برنامجك لتخفي شاشته الرئيسية بدلاً من عرضه مثال للتعرف للقيمه المرسله:

PHP كود :

Dim CommandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String) = My.Application.CommandLineArgs

  For i As Integer = 0 To CommandLineArgs.Count - 1
            MessageBox.Show(CommandLineArgs(i))
        Next 

الان قم بتشغيل البرنامج بارسالcommand اليه باستخدام الوظيفة run في الويندوز وكتابه:

كود :

"[color=#FF0000]FILEPATH[/color]" hi!

حيث FILEPATH هو عنوان التطبيق

يمكنك ايضا قراءة http://forum.codecall.net/topic/47568-re...-in-vbnet/

اعتذر عن اي خلل في هذا الكود حيث ان لدي مشكله في الفيجوال ولااستطيع التجربة للتاكد من عمله

الف شكر اخي @@أبورائد@@ علي ردك ولكن
الف شكر Hasna علي ردك ولكن كودك لا يعمل

الف الف شكر اخي alarb علي مرورك العطر وردك الاكثر من متميز وكودك يعمل بنجااح

الف شكر لكم جميعا اخواني علي ردكم

الصفحات : 1 2

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

هيما 2013

سعود

هيما 2013

سعود

@@أبورائد@@

هيما 2013

@@أبورائد@@

Hasna

alarb

هيما 2013