Bunu saglamak icin 3 yol var: Registry'de kullaniciya kayit, registry'de makineye kayit, startup klasorune kisayol koyma.
Ben Sadece Startup ( Başlangıc ) Klasorune Koydum Umarım İşinize Yarar...


Startup klasorune kayit

Kod:
Function Startup() Dim oShell As IWshShell_Class Dim oSCut As IWshShortcut_Class Dim sPath As String Set oShell = New IWshShell_Class sPath = oShell.SpecialFolders("Startup") Set oSCut = oShell.CreateShortcut(sPath & "\TestStartup.lnk") oSCut.TargetPath = cPGM oSCut.Save

__________________