Visual Basic Script


4_4_ Создание ярлыков - часть 4


    //Устанавливаем обычный стиль окна:
    NShortcut.WindowStyle = 1;

    //Клавиши быстрого вызова:
    NShortcut.Hotkey = "CTRL+ALT+f" ;

    //Путь к файлу иконки:
    NShortcut.IconLocation = "notepad.exe, 0" ;
 
    //Устанавливаем всплывающую подсказку:
    NShortcut.Description = "Ярлык блокнота" ;
 
    //Устанавливаем в качестве рабочей папки - Рабочий стол:
    NShortcut.WorkingDirectory = DesktopPath;
 
    //Сохраняем настройки и сам ярлык:
    NShortcut.Save();
 
 

        Кроме ярлыков к локальным ресурсам можно создавать ярлыки Интернета. Создадим ярлык адреса компании Microsoft.

         VBScript:

    Dim WshShell, UrlLink
    Set WshShell = WScript.CreateObject("WScript.Shell")
    Set UrlLink = WshShell.CreateShortcut("Microsoft.URL")
    UrlLink.TargetPath = "http://www.microsoft.com"
    UrlLink.Save

        JScript:

    var WshShell = WScript.CreateObject("WScript.Shell");
    var UrlLink = WshShell.CreateShortcut("Micrisoft.URL");
    UrlLink.TargetPath = "http://www.microsoft.com";
    UrlLink.Save();
 

Назад по тексту | Содержание | Вперед по тексту

О проекте | История | E-mail


Copyright (C) 2000 - 2001 Alex Neverov

#bn { DISPLAY: block } #bt { DISPLAY: block }




Начало  Назад  Вперед



Книжный магазин