判断某个网络打印机是否存在,如果不存在就添加

xttaetg 2016-10-10 01:57:00
各位,我现在的环境需要用域策略下发4个网络打印机,我是通过vbs脚本添加,但是发现有些用户第一次会添加不上某个打印机,所以我想对脚本做一下优化,先执行添加4个网络打印机,再去判断有没有加上,如果没有就一直加,脚本如下,只是部分
On Error Resume Next
strComputer = "."
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colPrinters = objWMIService.ExecQuery("Select * from Win32_Printer where Name='\\172.19.64.250\新源打印系统' ")

if IsEmpty(colPrinters) then WshNetwork.AddwindowsPrinterConnection "\\172.19.64.250\新源印系统"

for each c in colprinters
wscript.echo c.name
next

但是发现colPrinter的值不是空的,没有输出,求各位大神指教。
...全文
1730 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

4,008

社区成员

发帖
与我相关
我的任务
社区描述
它是一种微软环境下的轻量级的解释型语言,它使用COM组件、WMI、WSH、ADSI访问系统中的元素,对系统进行管理。
社区管理员
  • vbScript社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧