找回密码
 加入
搜索
查看: 1952|回复: 2

为什么我写的千千静听自动安装程序不好用啊

[复制链接]
发表于 2009-7-4 14:52:26 | 显示全部楼层 |阅读模式
Run("ttpsetup.exe")
WinWaitActive("千千静听 5.3 安装程序 Unicode","欢迎使用 千千静听 5.3 安装程序")
Send("!s")
WinWaitActive("千千静听 5.3 安装程序 Unicode","请仔细阅读")
Send("!a")
WinWaitActive("千千静听 5.3 安装程序 Unicode","选择要安装的组件")
Send("!n")
WinWaitActive("千千静听 5.3 安装程序 Unicode","指定安装本软件")
Send("!n")
WinWaitActive("千千静听 5.3 安装程序 Unicode","创建快捷方式")
Send("!n")
WinWaitActive("千千静听 5.3 安装程序 Unicode","完成 千千静听 5.3 安装向导")
ControlCommand ( "千千静听 5.3 安装程序 Unicode", "查看更新历史纪录", "Button2", "UnCheck", "" )
ControlCommand ( "千千静听 5.3 安装程序 Unicode", "安装免费附赠的“百度工具栏”", "Button3", "UnCheck", "" )
ControlClick ( "千千静听 5.3 安装程序 Unicode", "完成", "Button14")
发表于 2009-11-11 15:53:13 | 显示全部楼层
#requireadmin
#Region AutoIt3Wrapper 预编译参数(常用参数)
#AutoIt3Wrapper_icon=ico.ico
#AutoIt3Wrapper_outfile=自动安装.exe
#AutoIt3Wrapper_Res_Description=千千静听5.5.2.0安装脚本
#AutoIt3Wrapper_Res_LegalCopyright = 版权所有 (C) 2009
#AutoIt3Wrapper_Res_Comment=www.51aou.com 制作:醉爱清茶
#EndRegion AutoIt3Wrapper 预编译参数设置完成
#comments-start __________________
Au3 版本:  3.3.1.4
脚本作者:  醉爱清茶
QQ/TM:  410836733
脚本功能: 自动安装千千静听5.5.2.0
#comments-end 脚本开始___________

Opt("MouseCoordMode", 0)
Run ('ttpsetup.exe')
traytip(" 温馨提示","自动安装期间为避免操作失败,请勿动键盘鼠标",15)
$hd="千千静听 5.5.2 安装程序 Unicode"
WinWaitActive($hd,"欢迎使用 千千静听 5.5.2 安装程序")
ControlClick($hd,"开始(&S)","Button2")
WinWaitActive($hd,"请仔细阅读以下的")
ControlClick($hd,"我同意(&A)","Button2")
WinWaitActive($hd,"选择要安装的组件")
MouseClick("left", 46, 230, 1)
MouseClick("left", 27, 263, 1)
MouseClick("left", 46, 198, 1)
MouseClick("left", 64, 278, 1)
ControlClick($hd,"下一步(&N) >","Button2")
WinWaitActive($hd,"指定安装本软件的目标文件夹")
ControlSetText($hd,"指定安装本软件的目标文件夹","Edit1","C:\Program Files\TTPlayer")
ControlClick($hd,"下一步(&N) >","Button4")
WinWaitActive($hd,"我的桌面")
ControlClick($hd,"我的桌面","Button4")
ControlClick($hd,"下一步(&N) >","Button10")
WinWaitActive($hd,"千千静听 5.5.2 已成功安装到您的电脑上")
ControlClick($hd,"立即运行 千千静听 5.5.2","Button1")
ControlClick($hd,"把hao123设置为首页","Button4")
ControlClick($hd,"安装免费附赠的“百度工具栏”","Button3")
ControlClick($hd,"完成","Button15")
sleep(2000)
FileDelete(@DesktopDir&"\千千音乐.url")
发表于 2009-11-12 13:38:15 | 显示全部楼层
慢慢来肯定行的!重要的是看它出错的地方,你看一下是那段错了,改一下就好了!加油吧!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-16 12:30 , Processed in 0.076408 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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