|
本帖最后由 alskwo 于 2009-10-16 21:06 编辑
想写个微点主动防御软件的脚本,可是遇到的问题多多。脚本在下面,希望帮解下。
$a = "微点主动防御软件 安装程序"
$b = "微点主动防御软件 提示信息"
Run("微点主动防御软件 安装程序")
WinWaitActive($a,"语言选择")
ControlClick ($a,"","Button2")
WinWaitActive($a,"欢迎使用微点主动防御软件 安装向导")
send("{enter}")
WinWaitActive($a,"许可证协议")
ControlClick ($a,"","Button5") (图一)点击同意按钮也使过鼠标点击指令ControlClick("last","","同意","left")
,未成功,可能因为同意个页面有两个"Button5"吧,右上角的小叉叉也是"Button5",未试过鼠标坐标指令。
ControlClick ($a,"","Button2")
WinWaitActive($a,"客户信息")(图二)如果上面通过,应该下面是这样子走的。
ControlClick ($a,"","Button2")
ControlClick ($a,"","Button2")
WinWaitActive($b)
ControlClick ($b,"","Button2")
WinWaitActive($a,"选择安装路径")
ControlClick ($a,"","Button2")(图三)在这里我也走过过去,也试过send("{enter}")这个指令了
WinWaitActive($a,"选择程序文件夹")
ControlClick ($a,"","Button2")(图四)这里也同样定住了
WinWaitActive($a,"开始复制文件")
ControlClick ($a,"","Button2")不走,不解中。
WinWaitActive($a,"初始设置")
ControlClick ($a,"","Button2")
WinWaitActive($a,"请正确填写下述注册信息,并保管好所有的注册信息。")
ControlClick ($a,"","Button2")此处是选项按钮,不知道能否这样子写
send("{DOWN}{DOWN}{DOWN}{DOWN}")如果上面指令通过,这里就是下到省份。
ControlSend($a,"","Edit1","桂林")在信息框中输入信息。
ControlSend($a,"","Edit2","fdsafdsa@123.com")这里我想写个能随机生成一个9位数带后缀@123.com的邮箱,不知道什么写,希望大家指点下。
ControlSend($a,"","Edit3","13888888888")
ControlSend($a,"","Edit8","000000")
ControlSend($a,"","Edit8","000000")
ControlClick ($a,"","Button2")
停在了这里,还没写完,因为上面停住了,所以没在继续写下去。希望大家能帮我解决下,谢谢了。
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?加入
×
|