求助：如何利用批处理设置默认打印机？

cxmgxl

求助：如何利用批处理设置默认打印机？

apang

1. set "PrinterName=Microsoft Office Document Image Writer"
   
2. wmic printer where (name="%PrinterName%") call setdefaultprinter

复制代码

cxmgxl

谢谢apang的热心帮助！

cloversky

回复 2# apang

如果设置的是其他电脑共享的打印机怎么设置，我打开控制面板添加共享打印机的名字没效果

czjt1234

假如本机可以通过网上邻居访问 \\a002
在计算机 a002 上共享打印机
共享名为 AGFA-Acc 和 CanonBub

1. Dim oWshNetwork
   
2. 
   
3. Set oWshNetwork = CreateObject("WScript.Network")
   
4. 
   
5. '映射一个网络打印机
   
6. oWshNetwork.AddWindowsPrinterConnection "\\a002\AGFA-Acc"
   
7. 
   
8. '设置默认打印机
   
9. oWshNetwork.SetDefaultPrinter "\\a002\AGFA-Acc"

复制代码

打开：控制面板 - 打印机和传真，可以查看默认打印机

winxp 和 win7x64 测试通过

至于你说的控制面板添加共享打印机的名字没效果
请先确认打开网上邻居可以看到共享的电脑和打印机