Re: [CMD] W2k-AD dodawanie drukarki sieciowej na stacji

Autor: Tomasz Onyszko <gekkon_at_WYTNIJ.gazeta.pl>
Data: Mon 11 Apr 2005 - 12:57:56 MET DST
Message-ID: <d3dl7k$hk2$1@inews.gazeta.pl>
Content-Type: text/plain; charset=ISO-8859-2

Michal Kwiatkowski <mikeskil@polbox.odspamiacz.com> napisał(a):

> Witam!
>
> Jest sobie drukareczka z printserverem na stałym IP, powiedzmy 192.168.0.10.
> i druga - share serwera \\serwer\printer1 Chciałbym za pomocą polecenia
> powłoki (ew. mmc) zainstalować ja na wybranych stacjach; sęk w tym, że ZU
> nie ma praw by zainstalować ją samodzielnie, więc pierwsza instalacja na

Z scriptomatic - http://www.microsoft.com/technet -> script center

====
Installing Printer Ports

Set objWMIService = GetObject("winmgmts:")
Set objNewPort = objWMIService.Get _
    ("Win32_TCPIPPrinterPort").SpawnInstance_
objNewPort.Name = "IP_169.254.110.14"
objNewPort.Protocol = 1
objNewPort.HostAddress = "169.254.110.14"
objNewPort.PortNumber = "9999"
objNewPort.SNMPEnabled = False
objNewPort.Put_
=====
Installing Printer Drivers

Set objWMIService = GetObject("winmgmts:")
Set objDriver = objWMIService.Get("Win32_PrinterDriver")
objDriver.Name = "Apple LaserWriter 8500"
objDriver.SupportedPlatform = "Windows NT x86"
objDriver.Version = "3"
errResult = objDriver.AddPrinterDriver(objDriver)
========
Adding a Printer Connection

Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.AddWindowsPrinterConnection "\\PrintServer1\Xerox300"
WshNetwork.SetDefaultPrinter "\\PrintServer1\Xerox300"

Wiecej na technet

-- 
Tomasz Onyszko [MVP]
http://www.w2k.pl
-- 
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Received on Mon Apr 11 13:00:25 2005

To archiwum zostało wygenerowane przez hypermail 2.1.8 : Mon 11 Apr 2005 - 13:42:03 MET DST