skript für druckerinstallation

Print Page

HitTheCow 12.06.2007 - 11:34 804 1

Posts

HitTheCow

it's been an honor.

Registered: Mar 2002
Location: bielefeld
Posts: 6378

12.06.2007 - 11:34

ich hoff ich bin im richtigen subforum.

und zwar: ich bräuchte ein skript, das mir die aktuellen installierten (vom druckerserver zur verfügung gestellten) drucker ausliest - sie speichert - löscht und dann neu vom druckerserver installiert.

das ganze bräuchte ich um neue druckereinstellungen global per einmaligem loginskript zu aktualisieren/ändern.

ich hoff das war verständlich - oder gibts eine einfachere lösung?

ich hab bisher nur das "verbinden" gefunden:

Zitat
Drucker verbinden:

Dim WshNetwork
Set WshNetwork = WScript.CreateObject(“WScript.Network”)
On Error Resume Next
WshNetwork.AddWindowsPrinterConnection „\\server\druckerfreigabe”

//Bei W9x :
WshNetworkAddPrinterConnection „LPT1“, „\\ROM\HP500“

//Als Standarddrucker:
WshNetwork.SetDefaultPrinter “druckerfreigabe“

aber wie lese ich die derzeit installierten drucker aus? sind bei den clients unterschiedlich...

lg, htc

edit1:
drucker auslesen geht damit:
reg query "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Devices" >> C:\drucker.txt

Bearbeitet von HitTheCow am 12.06.2007, 11:54

Meltdown

Bloody Newbie

Registered: Jun 2007
Location: Wien
Posts: 6

12.06.2007 - 22:23

Würde auch via WMI funktionieren
Set objWMIService = GetObject("winmgmts://./root/cimv2" )

set colitems = objWMIService.ExecQuery("SELECT * FROM Win32_Printer", , 48)
For Each objItem In colItems
msgbox(objItem.Name)
Next

All times are GMT +1 hour. The time now is 04:24.

skript für druckerinstallation

Forum Index > Software > Coding Stuff

HitTheCow

Meltdown