84106846 发表于 2009-8-14 13:32:30

请大侠们写个MaxDOS6se的自动安装脚本

请大侠们写个MaxDOS6se的自动安装脚本
找不到可显文本一直没做成功

84106846 发表于 2009-8-15 12:48:59

1# 84106846


Run("MaxDOS_V6SE.exe")
WinWait("MaxDOS V6 Se 安装程序","下一步(&N) ")
WinWaitActive("MaxDOS V6 Se 安装程序","下一步(&N) ")
Send("!n")
WinWait("MaxDOS V6 Se 安装程序","我同意该许可协议的条款")
WinWaitActive("MaxDOS V6 Se 安装程序","我同意该许可协议的条款")
ControlClick("MaxDOS V6 Se 安装程序","我同意该许可协议的条款", "Button3", "left","")
Send("!n")
WinWait("MaxDOS V6 Se 安装程序","下一步(&N) ")
WinWaitActive("MaxDOS V6 Se 安装程序","下一步(&N) ")
Send("!n")
WinWait("MaxDOS V6 Se 安装程序","创建一个用于存放备份镜像的文件夹在 F:\MaxBAK")
WinWaitActive("MaxDOS V6 Se 安装程序","创建一个用于存放备份镜像的文件夹在 F:\MaxBAK")
Send("!n")
WinWait("MaxDOS V6 Se 安装程序","完成(&F)")
WinWaitActive("MaxDOS V6 Se 安装程序","完成(&F)")
Send("!f")

84106846 发表于 2009-8-15 12:50:15

2# 84106846

这个窗口过去,选不了我同意

水木子 发表于 2009-8-15 13:24:02

本帖最后由 水木子 于 2009-8-15 13:26 编辑

办法应该很多种
我讲个比较笨且有效的Send ("{Tab}") 几次
将光标移动到需要选的空间上 再 Send ("{SPACE}")
嘿嘿 是不是就可以啦！
多研究下吧！鼠标操作不行就键盘操作。
对了顺便提下 Send ("{Tab 5}") = 连续按5次 Tab 键

水木子 发表于 2009-8-15 13:31:07

ControlCommand("MaxDOS 安装程序", "许可协议", "Button1", ""Check", "")
当然你的控件ID不一定是"Button1"

84106846 发表于 2009-8-15 14:25:57

高手啊, 这个用TAB也选不了,要用上下键才行,鼠标操作不了,怎么D在这里用上下键

水木子 发表于 2009-8-15 17:40:54

本帖最后由 水木子 于 2009-8-15 18:04 编辑

抽空帮你写了一个，测试了完全可以，但是如果出现重复安装会弹出提示，只需要做个判断就可以了。
楼主需要注意的是，“下一步”以后“窗口标题”还和以前一样吗？
Run("MaxDOS_V6SE.exe")
WinWaitActive("MaxDOS V6 Se 安装程序","")
Send("!n")
WinWaitActive("MaxDOS 安装程序","")
ControlCommand("MaxDOS 安装程序", "许可协议", "Button3", "Check", "")
Sleep(100)
ControlClick("MaxDOS 安装程序", "许可协议","Button1")
WinWaitActive("MaxDOS 安装程序","")
ControlClick("MaxDOS 安装程序", "","Button1")
WinWaitActive("MaxDOS 安装程序","")
ControlClick("MaxDOS 安装程序", "","Button1")
WinWaitActive(" MaxDOS V6 已经安装成功。","")
ControlClick(" MaxDOS V6 已经安装成功。", "","Button1")
留点儿问题给你吧！安装完后会弹出网页和文本文档，楼主自己解决吧！
很简单的吧！在你的另一张帖里我已经解释过了。
页: [1]
查看完整版本: 请大侠们写个MaxDOS6se的自动安装脚本