Um Drucker einzubinden sehen die Skripte wie folgt aus:
' drucker.vbs - Einbindung der Netzwerkdrucker
' Author Christoph Goth
' -----------------------------------------------------------------'Option Explicit
Dim WSHNetwork
Set WSHNetwork = CreateObject("WScript.Network")' Drucker einbinden
WSHNetwork.AddWindowsPrinterConnection "\\SERVER\DRUCKERFREIGABE"
WSHNetwork.AddWindowsPrinterConnection "\\SERVER\DRUCKERFREIGABE2"' Ende des Windows Logon Scripts
Wscript.Quit
Um hier Drucker zusätzlich auf einen lokalen LPT-Port zu mappen für beispielsweise ältere Anwendungen muss das Skript entsprechend erweitert werden:
' drucker.vbs - Einbindung der Netzwerkdrucker
' Author Christoph Goth
' -----------------------------------------------------------------'Option Explicit
Dim WSHNetwork, objUser, strUserName, strUserDomain, ObjGroupDict, strPort, WSHShell, objShell
Set WSHNetwork = CreateObject("WScript.Network")
Set WSHShell = WScript.CreateObject("WScript.Shell")
Set objShell = CreateObject("Shell.Application")strPort = "LPT1"
' Drucker einbinden
WSHNetwork.AddWindowsPrinterConnection "\\SERVER\DRUCKERFREIGABE"' Drucker über LPT mappen
WSHShell.Run "Net USE LPT1: \\SERVER\DRUCKERFREIGABE /p:no", 0' Ende des Windows Logon Scripts
Wscript.Quit
Wie man sieht erfolgt das Mapping über den guten alten Net Use Befehl. Hier gibt noch andere Möglichkeiten aber diese ist die welche bei mir bisher am besten funktioniert hat.