leavey 发表于 2008-5-7 12:56:54

网维大师-自动安装

本帖最后由 leavey 于 2011-10-20 09:26 编辑

dim $1,$2,$3,$4,$5,$6,$bt,$bt1,$ikbpath,$wwpath
$2 = InputBox("客户端编号","客户端编号：","","",1,6,-1,-1)
$6 = IniRead(@ScriptDir &"\setup.ini","网维服务器地址","网维服务端地址","")
$wwpath =IniRead(@ScriptDir &"\setup.ini","网维程序路径","PATH","")
run($wwpath)
WinWaitActive("网维大师客户机安装检测","")
ControlClick("网维大师客户机安装检测","","")
WinWait("InstallShield Wizard","欢迎使用 网维大师(ICafe) 娱乐平台 InstallShield Wizard")
WinActivate("InstallShield Wizard","欢迎使用 网维大师(ICafe) 娱乐平台 InstallShield Wizard")
ControlClick("InstallShield Wizard","欢迎使用 网维大师(ICafe) 娱乐平台 InstallShield Wizard",1)
WinWait("问题","")
WinActivate("问题","")
ControlClick("问题","",6)
WinWait("InstallShield Wizard","许可证协议")
WinActivate("InstallShield Wizard","许可证协议")
ControlClick("InstallShield Wizard","许可证协议",6)
WinWaitActive("InstallShield Wizard","InstallShield Wizard 完成")
ControlClick("InstallShield Wizard","InstallShield Wizard 完成",1)
WinWaitActive("问题","是否安装")
ControlClick("问题","是否安装",7)
Sleep(1000)
WinWaitActive("客户端设置","")
ControlSetText("客户端设置","",1002,$2)
ControlSetText("客户端设置","",1030,$6)
ControlClick("客户端设置","",1000)
WinActivate("设置","")
ControlClick("设置","",6)

所用INI文件内容 文件名 setup.ini
[网维程序路径]
PATH=..\ww.exe
[网维服务器地址]
网维服务端地址=192.168.0.*

sunyelover 发表于 2008-5-7 18:03:40

我早就写了可以为没什么用
因为只有网吧或是维护网吧的才能用的
没想到叫你发了

leavey 发表于 2008-5-8 00:37:27

回复 2# sunyelover 的帖子

我也是刚实践的。。感觉很有兴趣

bcde149 发表于 2008-5-19 05:19:36

楼主

太好了,支持~~~~强烈支持




注册公司,注册公司程序,,怎样注册公司,如何注册公司
国际驾照

axandal 发表于 2008-5-27 15:43:52

很好很强大

网络凯子 发表于 2008-5-31 01:01:40

:face (13): :face (13): :face (13):

fushuo 发表于 2008-8-1 14:24:11

老大能不能加偶QQ呀，QQ: 2181388想请教一下老大!

newsunman 发表于 2009-4-6 11:08:48

没用啊
要注册网吧的

qinguofang 发表于 2009-6-2 03:00:50

我也来顶下LZ哈
呵呵
我这也用到
太好拉

zhupengyue 发表于 2009-6-30 14:58:05

网吧才用的啊

sngahxa851129 发表于 2011-1-20 02:07:37

怎么不会自动安装呢

sngahxa851129 发表于 2011-1-21 13:55:49

不能自动嘛

sngahxa851129 发表于 2011-1-22 00:18:07

不能自动安装啊。。。。。
页: [1]
查看完整版本: 网维大师-自动安装