[laimas]

var wsh = new ActiveXObject("WScript.Shell"),
    pth = wsh.CurrentDirectory + "\\", //текущая папка
    lnk = wsh.CreateShortcut("main.lnk"); //создать ярлык в текущей папке

lnk.IconLocation = "shell32.dll, 1";
lnk.Description = "Test";
lnk.Arguments = "test.txt";
lnk.TargetPath =  "notepad.exe";
lnk.WindowStyle = 1;
lnk.WorkingDirectory = pth;
lnk.Save();

wsh.Run(lnk); //блокнот откроется с запросом на создание файла, если его нет в текушей папке