Frage ist gelöstWelcher User hat im Netzwerk welchen drucker installiert ?
24.08.2009
14:09:22 Uhr1386 Aufrufe
1 Antwort
14:09:22 Uhr
1 Antwort
Noch nicht bewertet
Hallo zusammen,
kann mir jemand sagen wie ich mittels Skript heraus bekommen kann welcher User
in meinem Netzwerk welchen Netzwerkdrucker installiert hat ?
Habe es leider versäumt zu Dokumentieren welcher User an welchen freigegeben Drucker angeschlossen wurde.
Auf den Printserver habe ich leider keinen direkten Zugriff, der steht nicht in meiner Domäne.
Ich bin auf der Suche nach einen Tool oder einem Skript (vbs oder Batch oder…) was mir auf "Knopfdruck"
die gewünschten Daten liefert
Vielen Dank schon mal für eure Mithilfe.
kann mir jemand sagen wie ich mittels Skript heraus bekommen kann welcher User
in meinem Netzwerk welchen Netzwerkdrucker installiert hat ?
Habe es leider versäumt zu Dokumentieren welcher User an welchen freigegeben Drucker angeschlossen wurde.
Auf den Printserver habe ich leider keinen direkten Zugriff, der steht nicht in meiner Domäne.
Ich bin auf der Suche nach einen Tool oder einem Skript (vbs oder Batch oder…) was mir auf "Knopfdruck"
die gewünschten Daten liefert
Vielen Dank schon mal für eure Mithilfe.
AndreasHoster schreibt am 24.08.2009 um 14:23:26 Uhr
Könnte man über eine Anmeldeskript rausbekommen, für die User die sich anmelden (Skript muß unter der Useranmeldung laufen, da Netzwerkdrucker User spezifisch sind). Die Ausgaben der Anmeldungen könnte man dann ja in einer Datenbank speichern.
Gibt vermutlich mehr Infos raus als Du brauchst, aber kann man ja anpassen. Gibt auch lokale Drucker aus, sieht man aber am Attribut Lokal.
01.
On Error Resume Next 02.
03.
Const wbemFlagReturnImmediately = &h10 04.
Const wbemFlagForwardOnly = &h20 05.
06.
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2") 07.
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Printer", "WQL", _ 08.
wbemFlagReturnImmediately + wbemFlagForwardOnly) 09.
10.
For Each objItem In colItems 11.
WScript.Echo "Caption: " & objItem.Caption 12.
WScript.Echo "Default: " & objItem.Default 13.
WScript.Echo "Description: " & objItem.Description 14.
WScript.Echo "DeviceID: " & objItem.DeviceID 15.
WScript.Echo "DriverName: " & objItem.DriverName 16.
WScript.Echo "Local: " & objItem.Local 17.
WScript.Echo "PortName: " & objItem.PortName 18.
WScript.Echo "ServerName: " & objItem.ServerName 19.
WScript.Echo "ShareName: " & objItem.ShareName 20.
WScript.Echo "SystemName: " & objItem.SystemName 21.
WScript.Echo 22.
Next
