Scopiazzando qua e la...
set WshShell = CreateObject("WScript.Shell")
Startup = WshShell.SpecialFolders("Startup")
set oShellLink = WshShell.CreateShortcut(Startup & "\Nome_Link.lnk")
oShellLink.TargetPath = "C:\MioPercorso\MioProgramma.exe"
oShellLink.WindowStyle = 1
oShellLink.WorkingDirectory = "C:\MioPercorso"
oShellLink.Save
Così dovresti creare il link nella cartella "Esecuzione Automatica"
