huangguolian 发表于 2010-3-24 12:02:38

自动更换网段后登录共享打印机(Win7平台下测试)

Run(@ComSpec & ' /c Netsh interface IP set address name="Local Area Connection" source=static addr=192.168.1.7 mask=255.255.255.0 gateway=192.168.1.1',"", @SW_HIDE)

Sleep(4000)

Send("#r")
WinWaitActive("运行","")
WinActive("运行","")
Send("\\192.168.1.26") ;准备登陆共享打印机的PC
Send("{enter}")
Sleep(1000)

WinWaitActive("Windows 安全","")
WinActive("Windows 安全","")
ControlSetText("Windows 安全", "", "Edit1", "此处填写账户名
ControlSetText("Windows 安全", "", "Edit2", "此处填写密码")
Sleep(1000)

Send("{enter}")假设当前PC的IP为192.168.2.2

masterpcc 发表于 2010-3-24 13:15:57

谢谢分享!!

duandream 发表于 2010-9-4 12:19:44

谢谢分享!!

fengzr 发表于 2010-9-5 00:49:07

看看                              ok

wy554128 发表于 2010-10-23 11:25:00

谢谢分享!!

r437984177 发表于 2014-10-22 23:45:26

学习学习!!!!!!!!!

huangwei 发表于 2015-1-17 18:06:46

谢谢分享!!

cfanpc 发表于 2015-10-29 14:25:00

可以直接用ShellExecute("\\192.168.1.26"),效果是一样的
页: [1]
查看完整版本: 自动更换网段后登录共享打印机(Win7平台下测试)