Работа с принтерами

Подобно работе с сетевыми дисками, WSH предоставляет для работы с сетевыми принтерами по сути те же методы.

EnumPrinterConnections – возвращает список подключенных принтеров

Синтаксис:

objPrinters = object.EnumPrinterConnections

где

object - объект WshNetwork

objPrinters - ссылка на коллекцию принтеров

AddPrinterConnection – подключает сетевой принтер.

WshNetworkt.AddPrinterConnection strLocalName, strRemoteName [,bUpdateProfile [,strUser][,strPassword]

где

strLocalName – назначаемое имя подключенному принтеру

strRemoteName - удаленное имя

Необязательные параметры:

bUpdateProfile - логическая величина (true или false),определяющая сохранять ли сделанную настройку в пользовательской конфигурации.

strUser, strPassword - вы можете указать имя и пароль для доступа к диску.

Set WshNetwork = CreateObject("WScript.Network")

WshNetwork.AddPrinterConnection "LPT1", “Server\\LaserJet1”

RemovePrinterConnection – отключат сетевой принтер.

Синтаксис:

WshNetwork.RemovePrinterConnection strName, [bForce], [bUpdateProfile]

где:

strName - имя диска

Необязательные параметры:

bForce - логический параметр. Если принимает значение true, то сетевой принтер отключается, независимо от того, используется он в настоящий момент или нет.

bUpdateProfile - логический параметр, указывающий, сохранить ли сделанную настройку в пользовательском профиле.

Set WshNetwork = CreateObject("WScript.Network")

WshNetwork.RemovePrinterConnection "LPT1:"

Кроме методов, подобных методам для работы с сетевыми дисками Windows Scripting Host для работы с принтерами предоставляет еще несколько.

AddWindowsPrinterConnections – устанавливает новый принтер в Windows.

Синтаксис:

WshNetwork.AddWindowsPrinterConnection(strPrinterPath)

где

strPrinterPath - путь к принтеру

Set WshNetwork = CreateObject("WScript.Network")

PrinterPath= "\\printserv\DefaultPrinter"

WshNework.AddWindowsPrinterConnection(PrinterPath)

SetDefaultPrinter – устанавливает принтер по умолчанию

Синтаксис:

object.SetDefaultPrinter strPrinterName

где

object - объкт WshNetwork

strPrinterName - удаленное имя принтера

Set WshNetwork = WScript.CreateObject("WScript.Network")

‘создаем объект WshNetwork

WshNetwork.AddPrinterConnection "LPT1:", “\\Server\\Prnt1”

‘подключаем к системе сетевой принтер

WshNetwork.SetDefaultPrinter "LPT1:"

‘задаем его принтером по умолчанию

Дата добавления: 2015-06-25