Перейти на главную страничку сайта (список статей, файлы для скачивания)
Описание объектов Windows Script Host, их свойств и методов
Содержание:
1. Создание объекта 2. Свойства 2.1. ComputerName 2.2. UserName 2.3. UserDomain 3. Методы 3.1. EnumNetworkDrives 3.2. EnumPrinterConnections 3.3. MapNetworkDrive 3.4. RemoveNetworkDrive 3.5. AddPrinterConnection 3.6. AddWindowsPrinterConnection 3.7. RemovePrinterConnection 3.8. SetDefaultPrinter
Пример:
Set WshNetwork = CreateObject("WScript.Network")
Синтаксис:
ComputerName
Возвращаемое значение: строка, имя компьютера.
Замечание: только чтение.
Пример:
Set WshNetwork = CreateObject("WScript.Network") MsgBox WshNetwork.ComputerName
Синтаксис:
UserName
Возвращаемое значение: строка, имя пользователя.
Замечание: только чтение.
Set WshNetwork = CreateObject("WScript.Network") MsgBox WshNetwork.UserName
Синтаксис:
Возвращаемое значение: строка, имя домена.
Замечание: только чтение.
Пример:
Set WshNetwork = CreateObject("WScript.Network") MsgBox WshNetwork.UserDomain
Синтаксис:
EnumNetworkDrives
Назначение: возвращает коллекцию сетевых дисков. Нечётные элементы содержат UNC-пути сетевых дисков.
Параметры: нет.
Пример:
Set WshNetwork = CreateObject("WScript.Network") Set Drives = WshNetwork.EnumNetworkDrives i = 0 While i <= Drives.Count-1 MsgBox Drives.Item(i) & " - " & Drives.Item(i+1) i = i+2 Wend
Синтаксис:
EnumPrinterConnections
Назначение: возвращает коллекцию сетевых принтеров. Нечётные элементы содержат сетевые имена принтеров, чётные - названия локальных портов.
Параметры: нет.
Пример:
Set WshNetwork = CreateObject("WScript.Network") Set Printers = WshNetwork.EnumPrinterConnections i = 0 While i <= Printers.Count-1 MsgBox Printers.Item(i) & " - " & Printers.Item(i+1) i = i+2 Wend
Синтаксис:
MapNetworkDrive(<LocalName>,<RemoteName>,<UpdateProfile>, <User>,<Password>)
Назначение: подключает сетевой диск.
Параметры:
Пример:
Set WshNetwork = CreateObject("WScript.Network") WshNetwork.MapNetworkDrive "Z:", "\\SERVER\Programs"
Синтаксис:
RemoveNetworkDrive(<Name>,<Force>,<UpdateProfile>)
Назначение: отключает сетевой диск.
Параметры:
Пример:
Set WshNetwork = CreateObject("WScript.Network") WshNetwork.RemoveNetworkDrive "Z:"
Синтаксис:
AddPrinterConnection(<LocalName>,<RemoteName>,<UpdateProfile>, <User>,<Password>)
Назначение: подключает сетевой принтер.
Параметры:
Пример:
Set WshNetwork = CreateObject("WScript.Network") WshNetwork.AddPrinterConnection "LPT1", "\\Server\Print1"
Синтаксис:
AddWindowsPrinterConnection(<PrinterPath>,<DriverName>,<Port>)
Назначение: подключает сетевой принтер без явного указания локального порта.
Параметры:
Пример:
Set WshNetwork = CreateObject("WScript.Network") WshNetwork.AddWindowsPrinterConnection "\\Server\Print1"
Синтаксис:
RemovePrinterConnection(<Name>,<Force>,<UpdateProfile>)
Назначение: отключает сетевой принтер.
Параметры:
Пример:
Set WshNetwork = CreateObject("WScript.Network") WshNetwork.RemovePrinterConnection "\\Server\Print1"
Синтаксис:
SetDefaultPrinter(<Name>)
Назначение: делает сетевой принтер принтером по умолчанию.
Параметры:
Пример:
Set WshNetwork = CreateObject("WScript.Network") WshNetwork.SetDefaultPrinter "\\Server\Print1"
Составление - Людоговский Александр
Перейти на главную страничку сайта (список статей, файлы для скачивания)
© 2007 http://www.script-coding.com При любом использовании материалов сайта обязательна ссылка на него как на источник информации, а также сохранение целостности и авторства материалов.