Script - Drucker als std. setzen

[magiceye 10]

Hallo,

 

habe über 200 clients im netzwerk !

mein script für die gpo

 

rundll32 printui.dll,PrintUIEntry /q /in /n \\SERVER\DRUCKER

 

das problem ist, die drucker was drauf sind sollen gelöscht werden und

ein bestimmter von den neuen als standard drucker gesetzt werden.

 

ist das möglich ?

 

Danke im Voraus !

 

mfg

[marka 589]

Hier ein Script in VB, um einen vorhandenen Drucker als Standarddrucker zu definieren:

 

' Script zum Rücksetzen des Standarddruckers für Windows NT und XP
'
' How to:
' Bitte in Zeile 11 den Druckernamen eintragen. Der entsprechende Drucker muss auf dem System schon installiert sein!
'Netzwerkdrucker bitte folgendermaßen eintragen: \\<Servername>\Druckername . z.B.: \\Meinedomain\MeinDrucker
'
'Variablebn definieren
Dim net
Dim defprinter
Dim copyright
defprinter = "\\<Server>\<printer>" ' <-- Hier den Druckernamen eintragen, Anführungsstriche stehen lassen.
copyright =  "Scriptversion  1.0, 01|2007," & VbCr & "Erstellt von Markus Kafurke"
Set net = CreateObject("WScript.Network")
net.SetDefaultPrinter defprinter
Set Shell = CreateObject("WScript.Shell")
Meldung = "Folgender Drucker wurde erfolgreich als Standarddrucker eingerichtet:  '" &VbCr & defprinter &"'"& VbCr & VbCr & copyright
Shell.Popup Meldung, 5, "Standarddrucker geändert", vbOKOnly + vbinformation

[magiceye 10]

danke für die schnelle hilfe, nur ein prob. ist da noch aufgetaucht !

obwohl der drucker da ist, kommt die folgende meldung

 

--> Fehler : Es ist kein Drucker mit dem Namen "\\<server>\<drucker> vorhanden.

code: 80020009

quelle: WSHNetwork.SetDefaultPrinter

 

mfg

[magiceye 10]

kann es evtl. an der Namensauflösung liegen !??

 

ich probiere es mal aus !

 

feedback folgt !