Kann ich VBScript erhalten, um eine freundliche Fehlermeldung anzuzeigen?

Question

Ich bin ein Netzwerkdrucker mit VBScript installieren und ich möchte einen freundlichen Fehler anzeigen, wenn die Warteschlange nicht vorhanden ist oder der Druckerserver nicht verfügbar ist, kann ich dies mit VBScript tun? Mein Code ist unten.

Dim net 
Set net = CreateObject("WScript.Network") 
net.AddWindowsPrinterConnection "\\printsrv\HPLaser23" 
net.SetDefaultPrinter "\\printsrv\HPLaser23" 

Vielen Dank für die Hilfe

Steven

Answer 1

die Zeile hinzufügen:

On Error Resume Next ' the script will "ignore" any errors 

Bevor Sie Ihren Code

und führen Sie dann ein:

if Err.Number <> 0 then 
    ' report error in some way 
end if 
On Error GoTo 0 ' this will reset the error handling to normal 

nach dem Code

Es ist normalerweise am besten, um zu versuchen, die Anzahl der Codezeilen zu halten zwischen den On Error Resume Next und den On Error GoTo 0, so wenig wie möglich, da es selten gut ist, Fehler zu ignorieren.