网维大师-自动安装

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("网维大师客户机安装检测","","[class:Button;INSTANCE:2]")
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

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

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

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

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

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

很好很强大

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

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

不能自动安装啊。。。。。

		自动登录	找回密码
密码			加入

[原创] 网维大师-自动安装

回复 2# sunyelover 的帖子

楼主