* lcfile is the file the link will point to * lcname is the name of the shortcut to appear on the desktop * with the lnk extension oShell = CREATEOBJECT('WScript.Shell') lcdesktop = oShell.SpecialFolders('Desktop') oLink = oShell.CreateShortcut(lcdesktop + "\" + lcname) oLink.TargetPath = lcfile oLink.Save