找回密码
 加入
搜索
查看: 1255|回复: 0

求高手帮忙修改一下代码

[复制链接]
发表于 2009-4-28 21:28:44 | 显示全部楼层 |阅读模式
$1=MsgBox(4, "开始安装", "安装完成后电脑将自动重启 "[email=&@CRLF]&@CRLF[/email]&"是否继续", 5)
if $1<7 Then
run("Setup.exe")
EndIf
if $1=7 Then
MsgBox(4096, "安装结束", "你已取消了安装程序将退出", 2)
exit
EndIf
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","欢迎使用 iKeeper网络安全管理系统")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","我同意该许可协议的条款")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button5")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","请输入您的用户信息并单击")
ControlSetText("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","名称","Edit1","嘻笑网吧")
ControlSetText("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","公司","Edit2","沸点网络")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button5")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","请阅读下面的信息")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","输入网吧编码")
$bm = IniRead("config.ini","fdwl","网吧编码","编号错误")
$ip = IniRead("config.ini","fdwl","计费中心IP地址","ip错误")
$lnk = IniRead("config.ini","fdwl","是否生成快捷方式","请输入0或1")
$ybt = IniRead("config.ini","fdwl","安装英保通补丁","请输入0或1")
$cn=RegRead("HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName","computername")
$bh = stringright($cn,3)
ControlSetText("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","网吧编码","Edit1",$bm)
ControlSetText("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","网吧编码","Edit2",$bh)
ControlSetText("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","计费中心IP地址","Edit3",$ip)
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button5")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","选择选项")
if $lnk=0 then
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button5")
endif
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","如果您的计算机是英保通专用")
if $ybt=1 then
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button5")
endif
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","选择安装文件夹")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","快捷方式文件夹")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","准备安装")
ControlClick("iKeeper网络安全管理系统 网吧版 计费客户端 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 客户端保护 安装程序","选择安装文件夹")
ControlClick("iKeeper网络安全管理系统 客户端保护 安装程序","","Button1")
WinWaitActive("iKeeper网络安全管理系统 客户端保护 安装程序","准备安装")
ControlClick("iKeeper网络安全管理系统 客户端保护 安装程序","","Button1")


以上代码不知道那点出了错,不能正常工作,希望高手帮忙修改一下!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-9-23 04:30 , Processed in 0.071724 second(s), 21 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表