4
Windows Printserver - Änderung am Client automatisieren
Hallo zusammen,
eine kurze Beschreibung des Szenarios:
- bestehendes Active Directory
- Printserver W2K3
- Drucker am Client manuell zugewiesen
Wie im Betreffe genannt, ändert sich der Hostname / IP des Printservers, sprich ein neuer.
Ich habe vor einigen Jahren mal ein ähnliches Szenario gehabt, welches ich via Loginscript gelöst habe, nur leider fehlt mir gerade die Doku dazu ;).
Ablaufen würde es wie folgt:
- Benutzer meldet sich an
- im Loginscript steht quasi:
Wenn dein Standarddrucker \\Printserver_alt\Drucker1 ist ändere dies in \\Printserver_neu\Drucker1
Hat jemand den passenden Lösungsansatz?
Danke.
eine kurze Beschreibung des Szenarios:
- bestehendes Active Directory
- Printserver W2K3
- Drucker am Client manuell zugewiesen
Wie im Betreffe genannt, ändert sich der Hostname / IP des Printservers, sprich ein neuer.
Ich habe vor einigen Jahren mal ein ähnliches Szenario gehabt, welches ich via Loginscript gelöst habe, nur leider fehlt mir gerade die Doku dazu ;).
Ablaufen würde es wie folgt:
- Benutzer meldet sich an
- im Loginscript steht quasi:
Wenn dein Standarddrucker \\Printserver_alt\Drucker1 ist ändere dies in \\Printserver_neu\Drucker1
Hat jemand den passenden Lösungsansatz?
Danke.
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 219523
Url: https://administrator.de/contentid/219523
Printed on: April 19, 2024 at 07:04 o'clock
4 Comments
Latest comment
Hi,
wie das löschen geht weiß ich nicht genau (aber auch mit dem rundll32 printui.dll),
aber das hinzufügen geht so:
Hoffe konnte etwas weiter helfen ;)
Gruß
wie das löschen geht weiß ich nicht genau (aber auch mit dem rundll32 printui.dll),
aber das hinzufügen geht so:
rundll32 printui.dll,PrintUIEntry /in /n "\\printserver\printer" Hoffe konnte etwas weiter helfen ;)
Gruß
Hallo,
hilft dir GPP weiter?
http://www.petenetlive.com/KB/Article/0000492.htm
Finde ich einfacher als Login-Skripts.
mfg
hilft dir GPP weiter?
http://www.petenetlive.com/KB/Article/0000492.htm
Finde ich einfacher als Login-Skripts.
mfg
Beide Lösungen sind bekannt, danke dafür, helfen mir der Einfachheit halber aber nicht wirklich weiter.
Großes Manko ist, das es ungefähr 40 verschiedene Drucker Freigaben gibt, je nach Abteilung.
Ziel ist es also wirklich nur, den angesprochenen neuen Printserver beim Client zu ändern.
Die Freigaben sind identisch, daher wäre diese Variante die schnellste, und ich weis das es geht, nur nicht mehr wie.
Großes Manko ist, das es ungefähr 40 verschiedene Drucker Freigaben gibt, je nach Abteilung.
Ziel ist es also wirklich nur, den angesprochenen neuen Printserver beim Client zu ändern.
Die Freigaben sind identisch, daher wäre diese Variante die schnellste, und ich weis das es geht, nur nicht mehr wie.
Zitat von @7dpbt5:
Beide Lösungen sind bekannt, danke dafür, helfen mir der Einfachheit halber aber nicht wirklich weiter.
Großes Manko ist, das es ungefähr 40 verschiedene Drucker Freigaben gibt, je nach Abteilung.
Ziel ist es also wirklich nur, den angesprochenen neuen Printserver beim Client zu ändern.
Die Freigaben sind identisch, daher wäre diese Variante die schnellste, und ich weis das es geht, nur nicht mehr wie.
Beide Lösungen sind bekannt, danke dafür, helfen mir der Einfachheit halber aber nicht wirklich weiter.
Großes Manko ist, das es ungefähr 40 verschiedene Drucker Freigaben gibt, je nach Abteilung.
Ziel ist es also wirklich nur, den angesprochenen neuen Printserver beim Client zu ändern.
Die Freigaben sind identisch, daher wäre diese Variante die schnellste, und ich weis das es geht, nur nicht mehr wie.
Falls es jemanden interessiert:
' Druckermigration
Option Explicit
Dim objNetwork, objPrinter, i
Dim fso, tf, strFile, StrPath
Dim oldServer, newServer
Dim oldPrinter, newPrinter
Set objNetwork = CreateObject("WScript.Network")
Set objPrinter = objNetwork.EnumPrinterConnections
Set fso = CreateObject("Scripting.FileSystemObject")
oldServer="\\Printserv_alt\"
newServer="\\Printser_new\"
If objPrinter.Count = 0 Then
Wscript.Quit(0)
End If
For i = 0 to objPrinter.Count -1 Step 2
oldPrinter=objPrinter.Item(i+1)
If UCase(left(oldPrinter,Len(oldServer)))=UCase(oldServer) Then
newPrinter=newserver & Right(oldPrinter,Len(oldPrinter)-Len(oldServer))
on error resume next
objNetwork.RemovePrinterConnection oldPrinter, True, True
objNetwork.AddWindowsPrinterConnection newPrinter
End if
Next
Wscript.Quit(1)
