Metoden createShortcut

Hej!

Jag har en fråga angående metoden CreateShortcut med vilken man kan skapa en shortcut genom VBScript. Men om man vill ta bort en shortcut, hur gör man då? :r

CreateObject("Scripting.FileSystemObject").GetFile(CreateObject("WScript.Shell").SpecialFolders("Desktop") &  "\namnetpådinshortcut.url").Delete

Ursäkta att svaret tog lång tid, har varit iväg. :r

Tyvärr så fungerar inte den koden du gav. Den säger att filen inte finns? :l

Ikonerna skapas så här, vilket fungerar:

CreateShortCut OfficeXP, "quicklaunch", "", "Microsoft Word", "C:\Program\Microsoft Office\Office10\winword.exe", "", "C:\Program\Microsoft Office\Office10\winword.exe, 0"

Och när man försöker ta bort en ikon så försöker vi göra det med denna kod:

CreateObject("Scripting.FileSystemObject").GetFile(CreateObject("WScript.Shell").SpecialFolders("quicklaunch") &  "\Microsoft Word.lnk").Delete

Men då får vi felet att filen inte existerar, har provat med filändelsen .lnk också fast med samma resultat.

Fast kruxet är nog att det inte finns en SpecialFolder som heter "quicklaunch". Så här får du nog göra:

CreateObject("Scripting.FileSystemObject").GetFile(CreateObject("WScript.Shell").SpecialFolders("AppData") &  "\Microsoft\Internet Explorer\Quick Launch\Microsoft Word.lnk").Delete

Om genvägen nu heter "Microsoft Word.lnk".