我可以获取vbscript以显示友好的错误消息吗？

Question

我正在使用vbscript安装网络打印机，如果队列不存在或者打印机服务器不可用，我想显示友好错误，我可以使用VBScript吗？我的代码如下。

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

非常感谢您的帮助

史蒂芬

Answer 1

添加以下行：

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

在你的代码之前

然后做一个：

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

在你的代码之后

通常最好尽量减少On Error Resume Next和On Error GoTo 0之间的代码行数，因为忽略错误很少有好处。