(view source code of login_set_default_printer.vbs as plain text)
Set wshNetwork = CreateObject( "WScript.Network" )
On Error Resume Next
wshNetwork.SetDefaultPrinter "\\Server\HP LaserJet 4"
If Err Then
WScript.Echo "Error " & Err.Number & " while trying to make HP LaserJet 4 the default printer"
WScript.Echo "(" & Err.Description & ")"
End If
On Error Goto 0
Set wshNetwork = Nothing
page last modified: 2024-04-16; loaded in 0.0046 seconds