找回密码
 加入
搜索
AUTOIT CN»论坛 › AU3交流 › 『 提问交流 』 › 已解决问题区 › 软件自动安装到最后一步就不动了，帮我看看问题出在哪？ ...
12下一页
返回列表 发新帖
查看: 5260|回复: 17

软件自动安装到最后一步就不动了，帮我看看问题出在哪？

 火 [复制链接]
tianya1631
发表于 2010-1-24 02:19:09 | 显示全部楼层 |阅读模式
本帖最后由 tianya1631 于 2010-1-26 00:03 编辑

软件自动安装到最后一步完成那个界面，脚本就停止不动了，帮我看看问题出在哪？  【用17#KN007管理员的方法解决，在此谢谢热心帮助的朋友们！！】
TrayTip("ULtraISO正在安装", "安装期间，请勿进行其他操作，否则可能导致安装失败!",10)
Run("UltraISO_8.66_YlmF.exe")
Send("!n")
WinWaitActive("安装 - UltraISO","欢迎使用 UltraISO 安装向导")
Send("!n")
WinWaitActive("安装 - UltraISO","许可协议")
Send("!a")
Send("!n")
WinWaitActive("安装 - UltraISO","选择目标位置")
Send("D:\Program files\ULtraISO")
Send("!n")
WinWaitActive("安装 - UltraISO","选择开始菜单文件夹")
Send("!n")
WinWaitActive("安装 - UltraISO","选择附加任务")
Send("!d")
Send("!m")
Send("!n")
WinWaitActive("安装 - UltraISO","准备安装")
Send("{enter}")
WinWaitActive("安装 - UltraISO","信息")
Send("{enter}")
WinWaitActive("安装UltrISO","ULraISO安装向导完成")
Send("{space}")
Send("{table}{space}")
Send("!f")
WinWaitActive("安装 - UltraISO","欢迎使用 ultraiso 安装向导")
Send("{enter}")
WinWaitActive("安装 - UltraISO","许可协议")
Send("!a")
WinWaitActive("安装 - UltraISO","选择目标位置")
Send("D:\Program files\ULtraISO")
Send("{enter}")
WinWaitActive("安装 - UltraISO","选择开始菜单文件夹")
Send("{enter}")
WinWaitActive("安装 - UltraISO","选择附加任务")
Send("!d")
Send("!m")
Send("{enter}")
WinWaitActive("安装 - UltraISO","准备安装")
Send("{enter}")
WinWaitActive("安装 - UltraISO","信息")
Send("{enter}")
WinWaitActive("安装 - UltraISO","ULraISO 安装向导完成") 
Send("{SPACE}")
Send("{TAB}{SPACE}")
Send("!f")
Exit

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有账号？加入

×

评分

参与人数 1金钱 +10 收起 理由
afan + 10 感谢主动将修改帖子分类为[已解决]，请继续 ...

查看全部评分

回复

举报

Au3代码高亮发贴标签： [AU3] 你的代码 [/AU3]                   支持论坛的发展，请添加此》》网址导航《《为您的主页          
woeiwoei
发表于 2010-1-24 04:09:15 | 显示全部楼层
Send("{SPACE}")
sleep(1000)
Send("{TAB}{SPACE}")
Send("!f")
试试。。。。
回复

举报

llztt
发表于 2010-1-24 08:31:42 | 显示全部楼层
本帖最后由 llztt 于 2010-1-24 08:54 编辑

可以用CONTROLFOCUS试试定位，用TAB不保险
回复

举报

kn007
发表于 2010-1-24 08:35:37 | 显示全部楼层
可以用CONTROLFOCUS试试定位，用TAB不保险

PS：竟然装雨林木风的东西，弄个破软件竟放他们LOGO了，好像是 ...
llztt 发表于 2010-1-24 08:31



    不用这样吧。。。。就像番茄，按你这样说，他老说番茄花园，你说这系统好似是它做的！？

现在的人啊，都不可理喻。。
回复

举报

kn007
发表于 2010-1-24 08:42:12 | 显示全部楼层
YlmF哪惹你，让你这样，汗，我系统除了是IBM OEM XP EN SP3，不是雨林，其余如优化软件什么，都多少可以见到影子。。。现在有很多人在sfx加上签名，你能说那东西就是他做的？不是他做就不能署名？！，我说autoit不是你做的，你只是运用了个可以改名字的，改名字，加上自己的小小心得就成了软件，这软件你自豪的说是我做的，但它的内核核心呢？
XD，说话别太绝对，而且不要随意辱骂

我觉得任何团体都有存在的意义。。。
至少我觉得当年能想到做ghost的人，都是灵活人

而且。。

靠自己艰苦奋斗吧，不说了，，
不理解的人，还以为我是ylmf的。。
倒了


再说一句：现在很多东西都标上其他人的名字，如nod32那个破解可以42年那个。。关于里面就有这个破解者的信息，我说nod32是它制作的，你信不！？
回复

举报

kn007
发表于 2010-1-24 08:45:21 | 显示全部楼层
这是以前写的，用最土的办法，当时只会这个
#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=Setup.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=自动安装UltraISO 9.3.0.2600多国语言版
#AutoIt3Wrapper_Res_Description=自动注册，并且在语言选择中文
#AutoIt3Wrapper_Res_Fileversion=2.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=kn007
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
If FileExists(@ScriptDir & "\UltraISO 9.3.0.2600_pe.exe") Then
Run(@ScriptDir & "\UltraISO 9.3.0.2600_pe.exe")
WinWaitActive("Setup")
Send("!n")
Send("!a")
Send("!n")
Send("D:\Program Files\UltraISO")
Send("!n")
Send("!y")
Send("!n")
Send("!n")
Send("!i")
WinWaitActive("Setup - UltraISO","Completing the UltraISO Setup Wizard")
Send("!f")
WinWaitActive("Welcome")
Send("{Tab}")
Send("{Enter}")
WinWaitActive("Registration")
Send("UW-Madison Executive Education")
Send("{Tab}")
Send("1519-E287-A828-A24A")
Send("{Enter}")
Send("{Enter}")
Sleep(1000)
Run("D:\Program Files\UltraISO\UltraISO.exe")
Sleep(1000)
WinWaitActive("UltraISO")
Send("!o")
Send("{Down}")
Send("{Right}")
Send("{Down}")
Send("{Down}")
Send("{Down}")
Send("{Down}")
Send("{Down}")
Send("{Enter}")
Sleep(1000)
WinWaitActive("UltraISO")
Send("!{F4}")
Sleep(500)
Run("D:\Program Files\UltraISO\UltraISO.exe")
MsgBox(4096, "The Setup Was Completed !", "kn007 All Rights Reserved !        E-Mail:kn007@126.com")
Sleep(100)
else
MsgBox(4096, "Warning !!!  ", "Could Not Found The Setup File Here ! Please Check !")
Exit
Endif
再拿个这种方法的，建议楼主提供程序地址，大家帮你
#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=Setup.ico
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=自动安装QQ2009Beta2简体中文版
#AutoIt3Wrapper_Res_Description=自动安装注册
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=kn007
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <ACN_String.au3> 
If FileExists(@ScriptDir & "\QQ2009Beta2.exe") Then
Run(@ScriptDir & "\QQ2009Beta2.exe")
WinWait("腾讯QQ2009 安装向导")
WinActivate("腾讯QQ2009 安装向导")
WinWaitActive("腾讯QQ2009 安装向导")
ControlClick ("腾讯QQ2009 安装向导", "", "Button1")
ControlClick ("腾讯QQ2009 安装向导", "下一步(&N)", "Button3")
ControlClick ("腾讯QQ2009 安装向导", "", "Button6")
ControlClick ("腾讯QQ2009 安装向导", "", "Button12")
ControlClick ("腾讯QQ2009 安装向导", "下一步(&N)", "Button2")
ControlClick ("腾讯QQ2009 安装向导", "", "Button9")
ControlClick ("腾讯QQ2009 安装向导", "", "Button8")
ControlClick ("腾讯QQ2009 安装向导", "", "Button10")
ControlClick ("腾讯QQ2009 安装向导", "", "Button11")
ControlClick ("腾讯QQ2009 安装向导", "", "Button7")
ControlClick ("腾讯QQ2009 安装向导", "下一步(&N)", "Button2")
ControlSetText("腾讯QQ2009 安装向导","","Edit1","D:\Program Files\Tencent\QQ2009")
ControlClick ("腾讯QQ2009 安装向导", "", "Button7")
ControlClick ("腾讯QQ2009 安装向导", "安装(&I)", "Button2")
WinWait("腾讯QQ2009 安装向导","安装完成")
WinWaitActive("腾讯QQ2009 安装向导","安装完成")
ControlClick ("腾讯QQ2009 安装向导", "安装完成", "Button6")
ControlClick ("腾讯QQ2009 安装向导", "安装完成", "Button7")
ControlClick ("腾讯QQ2009 安装向导", "安装完成", "Button8")
ControlClick ("腾讯QQ2009 安装向导", "完成(&F)", "Button2")
MsgBox(4096, "The Setup Was Completed !", "kn007 All Rights Reserved !        E-Mail:kn007@126.com")
Sleep(111)
else
MsgBox(4096, "Warning !!!  ", "Could Not Found The Setup File Here ! Please Check !")
Exit
Endif
http://www.autoitx.com/forum.php?mod=viewthread&tid=10181&page=1&fromuid=7644076#pid94778
下载不用钱的
回复

举报

llztt
发表于 2010-1-24 08:53:33 | 显示全部楼层
别太激动哈，呵呵，我只是看不惯YLMF乱放LOGO和标题的做法而已，他们大部分软件都只是封装安装而已，放放LOGO也就罢了，但安装后软件里还到处是，太不地道了。。至于番茄等几家系统修改论坛，网上评论已多，我再说只会惹人嫌，不说了
KN说的对，任何团体都有存在的意义，纵然封装届是是非非再多，但他们的修改过的系统，惠及过太多人了，起码客观上节省了大家的时间、提高了效率，起码苦劳是有的了
我改贴，写的过火了，呵呵
回复

举报

haorui658
发表于 2010-1-24 08:53:54 | 显示全部楼层
一直认为controlclick要好用的多
回复

举报

tianya1631
 楼主| 发表于 2010-1-24 10:30:15 | 显示全部楼层
谢谢大家这么热心，源文件已经上传，大家说的方法我马上去试下看看，今天刚上线。~
回复

举报

tianya1631
 楼主| 发表于 2010-1-24 11:43:44 | 显示全部楼层
用auto3窗口工具查看“运行 ULraISO和访问 雨林木风官方网站”是在一个TNewCheckLisBox1里，没有button按钮，用contolcommand就不行了，但是我直接跳过这2个，运行完成那个命令也是不行，很郁闷呢~

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有账号？加入

×
回复

举报

llztt
发表于 2010-1-24 11:52:39 | 显示全部楼层
如果复选框不是一个单独控件，就只好用controlclick吧（带偏移参数的），这可以把复选框问题解决
回复

举报

tianya1631
 楼主| 发表于 2010-1-24 12:06:13 | 显示全部楼层
如果复选框不是一个单独控件，就只好用controlclick吧（带偏移参数的），这可以把复选框问题解决

请详细说明下，最好贴一下代码，谢谢！
回复

举报

haorui658
发表于 2010-1-24 22:45:23 | 显示全部楼层
建议楼主查询controlclick的用法
回复

举报

llztt
发表于 2010-1-24 22:58:56 | 显示全部楼层
本帖最后由 llztt 于 2010-1-24 23:06 编辑

忘从AUTOIT3.几版了，CONTROLCLICK改进了，增加了4个参数，分别是按钮、点击次数、相对控件X坐标、相对控件Y坐标，所以针对那些特别控件（一般是非按钮的），可以精确点击控件的位置和次数，就不用更不保险的MOUSECLICK了。。

使用起来很简单，查其帮助，对号入座参数就行，相对坐标，可以用AU3INFO查到
譬如你上面的那个例子，可以用
ControlClick("安装 - UltraISO","ULraISO 安装向导完成","TNewCheckLisBox1","primary",1,25,20)
试试

现成的例子得找找才行，忘放哪了
回复

举报

tianya1631
 楼主| 发表于 2010-1-24 23:08:11 | 显示全部楼层
谢谢了，我去找下，再试试~
回复

举报

下一页 »
12下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-9-28 02:12 , Processed in 0.093866 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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