错误800A01CE，通过vbs通过ip添加打印机

发布于 2025-01-16 04:09:18 字数 613 浏览 3 评论 0原文

当我尝试使用一个小代码在 Windows 10 Enterprise 64 位上添加打印机时。我遇到错误 800A01CE。请帮我解决这个问题。这是我的来源

Option Explicit
Dim strPrinterUNC, objNetwork 

strPrinterUNC = "\\10.95.200.11\HP LaserJet 400" 

Set objNetwork = createObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection strPrinterUNC
objNetwork.SetDefaultPrinter strPrinterUNC 

Set objNetwork = Nothing
MsgBox ("Add printer successfully")

我的错误图像。

我多次尝试更改 strPrinterUNC，但仍然出现上述错误。请建议我自定义代码的方法。谢谢你，

原文

When I tried a small code to add printer on window 10 enterprise 64bits. I meet error 800A01CE. Please help me to resolve this problem. This is my source

Option Explicit
Dim strPrinterUNC, objNetwork 

strPrinterUNC = "\\10.95.200.11\HP LaserJet 400" 

Set objNetwork = createObject("WScript.Network")
objNetwork.AddWindowsPrinterConnection strPrinterUNC
objNetwork.SetDefaultPrinter strPrinterUNC 

Set objNetwork = Nothing
MsgBox ("Add printer successfully")

My error as image.

I tried change strPrinterUNC manytime, but I still got the error above. Please suggest me the way to custom my code.
Thank you,

分享到QQ

分享到微博