Set Shell = CreateObject("WScript.Shell") DesktopPath = Shell.SpecialFolders("Desktop") Set Link = Shell.CreateShortcut(DesktopPath & "\Masm32 Editor.lnk") link.description = "Masm Editor" link.TargetPath = "d:\masm32\qeditor.exe" link.WindowStyle = 2 link.WorkingDirectory = "d:\masm32" link.Save