|
VBScript zum Verbinden aller Drucker in der OU des Users |
|
|
|
Geschrieben von Stefan Mrosek
|
|
Das automatisierte Zuweisen von Druckern zu den Nutzern ist eine knifflige Angelegenheit. Wie stellt man sicher, das die Nutzer auch Ihren Drucker zugewiesen bekommen ?
In einem gut strukturierten Active Directory ist dies mit Hilfe dieses VBScripts möglich. Das Script verbindet alle in der selben OU des Nutzers befindlichen Drucker zu dessen Workstation.
Damit dies funktioniert müssen natürlich die Drucker-Objekte im Active-Directory vom entsprechenden Druckserver in die OU des Nutzers verschoben werden. Am einfachsten findet man die Drucker mit der Find-Funktion. (Als Objekt-Typ Drucker auswählen und auf Jetzt Suchen klicken) Dann können die Drucker-Objekte mit Rechtsklick und Move in die gewünschte OU verschoben werden.
Das Script
' ***************************************************
'
' VBScript generated by SystemScripter 5.0
' www.scriptinternals.de
'
' Authoren: N. Fehlauer
' Stefan Mrosek
' Date: 09. März 2005
' Version: 1.0
'
' Diese Subroutine verbindet alle im aktuellen Context
' des Nutzers im AD liegenden Drucker zur Workstation
' Die Treiber werden installiert. Es wird kein Standard-
' Drucker zugewiesen.
' ***************************************************
'* Benötigte Deklarationen
Set wshNetwork = WScript.CreateObject( "WScript.Network" )
Set objADSysInfo = CreateObject("ADSystemInfo")
Set objUser = GetObject("LDAP://" & objADSysInfo.UserName)
Set objOU = GetObject(objUser.parent)
'* Aufruf der Subroutine
Call Submapprinter
'* Die Routine
Sub Submapprinter()
objOU.Filter=Array("printqueue")
For Each oPq In objOU
wshNetwork.AddWindowsPrinterConnection oPq.PrinterPath
Next
End Sub
Zu Favoriten hinzufügen (184) | Artikel zitieren | Aufgerufen: 8869
Nur registrierte Benutzer können Kommentare schreiben. Bitte melden Sie sich an oder registrieren Sie sich. Powered by AkoComment Tweaked Special Edition v.1.4.6 AkoComment © Copyright 2004 by Arthur Konze - www.mamboportal.com All right reserved |
|
Letzte Aktualisierung ( Donnerstag, 10 März 2005 )
|