ant.song 发表于 2008-5-5 10:05:27

autoit自动安装千千静听

其实这个代码是当时在上面下的，不过经过了些许改动。拿出来与大家分享。个人在学习自动安装这个程序编码过程中发现以下要点：
1.窗口提示信息
2.鼠标坐标位置
以下为代码
Opt("MouseCoordMode", 1)
run("TTPlayer_5.1.0_YlmF.exe")
WinWait("安装 - 千千静听","欢迎使用 千千静听 安装向导")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton2")
WinWait("安装 - 千千静听","许可协议")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton3")
WinWait("安装 - 千千静听","信息")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton3")
WinWait("安装 - 千千静听","选择目标位置")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton4")
WinWait("安装 - 千千静听","选择组件")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton4")
WinWait("安装 - 千千静听","选择开始菜单文件夹")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton5")
WinWait("安装 - 千千静听","选择附加任务")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton5")
WinWait("安装 - 千千静听","准备安装")
Send("{enter}")
WinWait("千千静听 - 选项","关联音频文件以及创建快捷方式")
WinActivate("千千静听 - 选项","关联音频文件以及创建快捷方式")
MouseClick("left", 758, 29, 1)
MouseClick("left", 628, 30, 1)
MouseClick("left", 546, 35, 1)
WinWait("安装 - 千千静听","信息")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton5")
WinWait("安装 - 千千静听","千千静听 安装向导完成")
Send("{TAB}{SPACE}")
ControlClick("安装 - 千千静听","完成(&F)","TButton5")

ant.song 发表于 2008-5-5 10:07:07

怎么以刷新出来相同的两篇，请版主帮忙删除！谢谢！

网络凯子 发表于 2008-5-5 15:09:16

BBS是什么时候开的，里面资料好像少喽狠多哈:face (32):

feng5064 发表于 2008-5-6 13:13:39

正需要这个东西！！！

wuha3619 发表于 2008-5-6 21:58:55

回复 3# 网络凯子 的帖子

你看我是什么时候注册的？:face (37):

hutong01 发表于 2008-5-19 13:45:29

呵呵看来我来的很是时候 呀!

waters 发表于 2008-12-5 14:22:36

好贴！大力支持！

jkyunpan 发表于 2008-12-5 15:43:18

多谢楼主了我学习了

wuluck 发表于 2008-12-6 13:28:51

使用，先看看学习一下

wuluck 发表于 2008-12-6 13:28:54

使用，先看看学习一下

chineseshelley 发表于 2008-12-16 07:38:43

好好学习，天天向上，哪天我也发一个上来……

cxd 发表于 2008-12-22 17:27:33

都是好文章！支持了！

飘渺风 发表于 2009-2-26 12:53:06

支持一下，辛苦了！！！

30220407 发表于 2009-3-21 21:22:09

学习了！正在找这个！

zhanqiukxc 发表于 2009-5-18 16:49:31

学习学习，我是新手
页: [1] 2
查看完整版本: autoit自动安装千千静听