LOCAL loShell AS WScript.Shell LOCAL loShortcut m.loShell = CREATEOBJECT("WScript.Shell") * edit a desktop shortcut m.loShortcut = m.loShell.CreateShortcut(GETFILE("lnk")) * change its description m.loShortcut.Description = "A new description" * and set its icon m.loShortcut.IconLocation = GETFILE("ico") + ",0" * done m.loShortcut.Save()More info at https://msdn.microsoft.com/en-us/library/f5y78918(v=vs.84).aspx