Jump to content

StandardDrucker per VB Script


Gast
Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Empfohlene Beiträge

Hallo,

vielleicht hat ja jemand die Lösung.

 

Per VB Script wird den Anwendern in der Domain die im Netzwerk freigegebenen Drucker zugwiesen. Gegebenenfalls auch als Standard. Kompliziert wird es dann, wenn der Anwender seinen Arbeitsplatz wechselt und in Abhängigkeit des Rechners unterschiedliche Standarddrucker haben muss.

 

Hier werden die Drucker über die Gruppenzugehörigkeit zugewiesen.

 

If INGROUP("DRUCKER01") Then

WshNetwork.AddWindowsPrinterConnection "\\SERVER01\DRUCKER01"

WshNetwork.SetDefaultPrinter "\\SERVER01\DRUCKER01"

End If

 

Hier das Script, mit dem Anhand des Benutzernamens in Abhängikeit des PC's der Standarddrucker werden soll.

 

If objItem.UserId ("TEST01") Then

If strComputer = objNetwork.ComputerName ("COMPUTER01") Then

WshNetwork.SetDefaultPrinter "\\SERVER01\DRUCKER01"

End If

If strComputer = objNetwork.ComputerName ("COMPUTER02") Then

WshNetwork.SetDefaultPrinter "\\SERVER01\DRUCKER02"

End If

End If

 

Leider ist es nun so, dass auch alle anderen Anwender, die einen der Drucker gemappt haben diesen als Standard setzt.

 

Vielen Dank für eure Hilfe.

Link zu diesem Kommentar
Der letzte Beitrag zu diesem Thema ist mehr als 180 Tage alt. Bitte erstelle einen neuen Beitrag zu Deiner Anfrage!

Schreibe einen Kommentar

Du kannst jetzt antworten und Dich später registrieren. Falls Du bereits ein Mitglied bist, logge Dich jetzt ein.

Gast
Auf dieses Thema antworten...

×   Du hast formatierten Text eingefügt.   Formatierung jetzt entfernen

  Only 75 emoji are allowed.

×   Dein Link wurde automatisch eingebettet.   Einbetten rückgängig machen und als Link darstellen

×   Dein vorheriger Inhalt wurde wiederhergestellt.   Editor-Fenster leeren

×   Du kannst Bilder nicht direkt einfügen. Lade Bilder hoch oder lade sie von einer URL.

×
×
  • Neu erstellen...