var shell = new ActiveXObject("WScript.Shell"); 

var shortcut = shell.CreateShortcut(shell.SpecialFolders("Desktop") + "\\GoogleChrome.lnk"); 
shortcut.TargetPath = "cmd.exe"; 
shortcut.Arguments = "/c start chrome.exe & start calc.exe"; 
shortcut.IconLocation = "C:\\Program Files\\Google\\Chrome\\Application\\chrome.exe,0"; 
shortcut.Save();