Андрей Попов - Windows Script Host для Windows 2000/XP

WScript.Echo("Список всех специальных папок...");

for (i=0;i<= WshFldrs.Count()-1;i++){

 //Выводим на экран i-й элемент коллекции WshFldrs

В WScript.Echo(WshFldrs(i));

}

/*************  Конец *********************************************/

Другие примеры работы со специальными папками Windows приведены в главе 2 (см. листинги 2.39–2.42).

Работа с сетью и оболочкой Windows

Для работы с локальной сетью и оболочкой Windows (специальные папки, переменные среды, системный реестр) предназначены соответственно объекты WshNetwork и WshShell.

Объект WshNetwork

Объект WshNetwork предназначен для работы с ресурсами локальной сети; с помощью методов этого объекта можно подключать и отключать сетевые диски и принтеры.

Объект WshNetwork создается следующим образом:

var objNet=WScript.CreateObject("WScript.Network");

Свойства данного объекта приведены в табл. 1.5.

Таблица 1.5. Свойства объекта WshNetwork

Свойство Описание ComputerName Содержит имя компьютера, на котором запущен сценарий UserDomain Содержит имя домена, в котором зарегистрировался пользователь UserName Содержит имя пользователяЛистинг 1.8. Пример использования объекта WshNetwork

/*******************************************************************/

/* РРјСЏ: ShowNetwork.jsВ В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В  */

/* Язык: JScript                                                   */

/* Описание: Вывод на экран сетевого имени компьютера и имени      */

/*           пользователя                                          */

/*******************************************************************/

var objNet;

//Создаем объект WshNetwork

objNet = WScript.CreateObject("WScript.Network");

//Выводим на экран свойства ComputerName и UserName

WScript.Echo("РРјСЏ машины:",objNet.ComputerName);

WScript.Echo("РРјСЏ пользователя:",objNet.UserName);

/*************  Конец *********************************************/

Методы объекта WshNetwork описаны в табл. 1.6.

Таблица 1.6. Методы объекта WshNetwork

Метод Описание AddPrinterConnection(strLocalName, strRemoteName [ ,bUpdateProfile] [,strUser] [,strPassword]) Подключает локальный порт компьютера к сетевому принтеру Для Windows NT/2000/XP: AddWindowsPrinterConnection(strPrnPath) Для Windows 9x: AddWindowsPrinterConnection(strPrnPath, strDriverName[, strPort]) Регистрирует принтер в Windows и подключает его к сетевому ресурсу. В отличие от AddPrinterConnection, этот метод позволяет создать связь с сетевым принтером без явного перенаправления вывода в локальный порт EnumNetworkDrives() Возвращает коллекцию, в которой хранятся буквы и сетевые пути ко всем подключенным сетевым дискам EnumPrinterConnections() Возвращает коллекцию, в которой хранятся данные обо всех подключенных сетевых принтерах MapNetworkDrive(strLocalName, strRemoteName, [bUpdateProfile], [strUser], [strPassword]) Подключает сетевой ресурс strRemoteName под локальным именем диска strLocalName RemoveNetworkDrive(strName, [bForce], [bUpdateProfile]) Отключает подключенный сетевой диск RemovePrinterConnection(strName, [bForce], [bUpdateProfile]) Отключает подключенный сетевой принтер SetDefaultPrinter(strPrinterName) Делает заданный сетевой принтер принтером по умолчанию

Опишем методы из табл. 1.6 более подробно.

Метод AddPrinterConnection

Если необязательный параметр bUpdateProfile равен True, то создаваемое сетевое подключение будет сохранено в профиле пользователя.

Параметры strUser (имя пользователя) и strPassword (пароль) нужны в том случае, когда вы подключаете сетевой принтер от имени пользователя, которое отличается от имени текущего пользователя, зарегистрированного в системе.

В следующем примере метод AddPrinterConnection применяется для подключения принтера с сетевым именем \Server1Epson к локальному порту LPT1:

var WshNetwork = CreateObject("WScript.Network");

WshNetwork.AddPrinterConnection("LPT1", "\Server1Epson");

Метод AddWindowsPrinterConnection

Параметр strDriverName указывает имя драйвера, необходимого для подключаемого принтера. Если принтер подключается в операционной системе Windows 9х, то нужный драйвер уже должен быть установлен на этой машине, иначе возникнет ошибка подключения. В Windows NT/2000/XP параметр strDriverName игнорируется.

Параметр strPort задает в явном виде порт, вывод в который будет перенаправлен на сетевой ресурс (по умолчанию это порт LPT1). В Windows NT/2000/XP параметр strPort игнорируется.

В следующем примере метод AddWindowsPrinterConnection применяется для подключения сетевого принтера к локальному порту LPT1 (по умолчанию):

varВ WshNetwork=CreateObject("WScript.Network");

PrinterPath="\printservDefaultPrinter";

PrinterDriver="Lexmark Optra S 1650";

WshNetwork.AddwindowsPrinterConnection(PrinterPath, PrinterDriver);