Показать сообщение отдельно
  #2 (permalink)  
Старый 23.10.2012, 15:28
Аватар для lord2kim
Профессор
Отправить личное сообщение для lord2kim Посмотреть профиль Найти все сообщения от lord2kim
 
Регистрация: 03.05.2011
Сообщений: 848

ufastudio,
var Myshell = new ActiveXObject("WScript.Shell");
var mypath = Myshell.SpecialFolders("Desktop"); // Путь к папке Рабочий стол
// Создание ярлыка и подписи к нему:
var myshortcut = Myshell.CreateShortcut(mypath+'\\Сцылко.lnk'); //ошибка в ковычке
// Папка расположения Windows:
var mywindir = Myshell.ExpandEnvironmentStrings("%windir%");
// Параметры ярлыка:
// расположение файла
myshortcut.TargetPath = '\\Program Files\\Internet Explorer\\iexplore.exe';
myshortcut.Arguments = "http://ya.ru"; //аргументы
// рабочая папка
myshortcut.WorkingDirectory = Myshell.ExpandEnvironmentStrings(mypath);
myshortcut.WindowStyle = 4; // тип окна (стандартное)
myshortcut.Save(); // Сохранить на диске
Ответить с цитированием