Per Skript einen Link auf der Schnellstartleiste hinzufügen

Folgendes VBS-Skript erstellt einen Link auf der Schnellstartleiste: On error resume next Set objFSO = CreateObject(„Scripting.FileSystemObject“) Set WshShell = WScript.CreateObject(„WScript.Shell“) Set colEnvironmentVariables = WshShell.Environment(„Volatile“) strQLFolder = colEnvironmentVariables.Item(„APPDATA“) Set objURLShortcut = WshShell.CreateShortcut(strQLFolder & „\Microsoft\Internet Explorer\Quick Launch\holgerkoenig.com“ & „.lnk“) objURLShortcut.TargetPath = http://www.holgerkoenig.com“ objURLShortcut.IconLocation = „c:\test\hk.ico“ objURLShortcut.Save