VBS,添加网络打印机

ytmin · 发表于 2009-3-19 19:50:55

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由 ytmin 于 2009-3-19 19:52 编辑

On Error Resume Next
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print01"
WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print03"
WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print04"
WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print05"
WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print06"
'WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print07"
WshNetwork.AddWindowsPrinterConnection "\\chidclprint\print08"
WshNetwork.SetDefaultPrinter "\\chidclprint\print04"

Wscript.Echo "请手动设置您的默认打印机.Please set your default printer."

dim oShell
set oshell = WScript.CreateObject("WScript.Shell")
oshell.run ("control.exe printers")
Set oShell=NoThing
WScript.quit
'power by ytmin,保存为VBS文件运行,添加网络打印机

保存为VBS,添加网络打印机.

van_kenny · 发表于 2009-3-19 19:53:54

沙发支持mm!

ytmin · 发表于 2009-3-19 20:00:25

为了七段那.改天发些AUTOIT的.

askman_1 · 发表于 2009-3-19 20:03:30

这个干嘛的,网络打印机是干啥的?

askman_1 · 发表于 2009-3-19 20:04:56

能不能编一个,根据某INI配置文件里的机器号码,来判断自己的机器号码是否执行某个批处理

ytmin · 发表于 2009-3-19 20:19:12

可以调用批处理文件的.

ytmin · 发表于 2009-3-19 20:19:54

这个干嘛的,网络打印机是干啥的?
askman_1 发表于 2009-3-19 20:03

登录/注册后可看大图

网络打印机就是SHARE在局域网内的打印机.

askman_1 · 发表于 2009-3-19 20:42:45

我的局域网没有这么高级的设备

ytmin · 发表于 2009-3-19 21:19:59

可呵，这个蛮好的，点一下就能添加打印机了，不能点来点去。

askman1123 · 发表于 2009-3-19 21:37:44

忘了,我换UID了

ytmin · 发表于 2009-3-19 21:39:35

忘了,我换UID了
askman1123 发表于 2009-3-19 21:37

登录/注册后可看大图

细胞分裂了？？？

askman_1 · 发表于 2009-3-19 21:54:20

细胞分裂了？？？
ytmin 发表于 2009-3-19 21:39

登录/注册后可看大图

MJ是没发加分的

ytmin · 发表于 2009-3-19 22:25:07

MJ是没发加分的
askman_1 发表于 2009-3-19 21:54

登录/注册后可看大图

那你能加吧？？

askman_1 · 发表于 2009-3-19 22:47:37

我加了啊

ytmin · 发表于 2009-3-19 22:49:32

谢谢啊，以后就叫你小气MAN（男）了。

askman_1 · 发表于 2009-3-20 22:03:09

嘿嘿,,,,,,嘿嘿,,,,,,,嘿嘿

帐号		自动登录	找回密码
密码			注册会员

VBS,添加网络打印机

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

评分

浏览过的版块