77342641
发表于 2010-3-11 13:37:29
下一个学习学习!
mo_shaojie
发表于 2010-3-11 15:25:37
哈,很好,楼主这个东东非常不错
jybb001
发表于 2010-3-11 18:14:11
回复 32# llztt
根据窗口内容是可以实现区分的效果,只是写通用程序判断起来相对比较麻烦。
我试试再加个高级模式,感谢您的建议!
devilma
发表于 2010-3-11 18:48:42
要是好用,收点钱也是应该的
ludongping86
发表于 2010-3-11 21:31:51
用什么脚本写的?
ludongping86
发表于 2010-3-11 21:32:43
用什么脚本写的?刚建的号。 有点买不起啊!
5209520
发表于 2010-3-12 10:35:28
本帖最后由 5209520 于 2010-3-12 10:37 编辑
不错现在可以实现了 安装了 但是还有个小问题,在安装程序结束的时候,脚本不能关闭程序最后的安装对话框。也就是确定之类的
; -------安装脚本开始--------By jybb001 QQ:576022718
run("E:\重要文件\装机大全\播放器\网络媒体build20090116.exe")
sleep(1680)
ControlClick("安装程序 - 网络媒体播放器","","TButton1")
sleep(880)
ControlClick("安装程序 - 网络媒体播放器","","TRadioButton1")
sleep(560)
ControlClick("安装程序 - 网络媒体播放器","","TButton2")
sleep(560)
ControlClick("安装程序 - 网络媒体播放器","","TButton3")
sleep(400)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
sleep(560)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
sleep(400)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
sleep(8160)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
jybb001
发表于 2010-3-12 18:43:30
回复 39# 5209520
是新弹出的对话框还是,最后一步没用?
用sleep等待不够精确,我正在准备改进成用winwait 或WinExists 昨天好不容易弄的差不多了,快调试好了,结果电脑死了,我在网吧,所以代码没了,一生气就去玩游戏了,
不过思路已经有了,有时间我再搞下,
xtiauj007
发表于 2010-3-12 21:31:09
这个好,我要了!
fightx
发表于 2010-3-13 07:50:49
呵呵 下载了 才知道自己没钱。。。
5209520
发表于 2010-3-13 08:44:44
回复5209520
是新弹出的对话框还是,最后一步没用?
用sleep等待不够精确,我正在准备改进成用 ...
jybb001 发表于 2010-3-12 18:43 http://www.autoitx.com/images/common/back.gif
就程序安装完成那部 一般是确定
devilma
发表于 2010-3-13 12:31:15
源码,源码啊。。最好分享下
漫天飞雪5691
发表于 2010-3-13 12:57:28
今天使用了一下啊确实不错啊支持你
wsjgdq
发表于 2010-3-13 16:53:25
呵呵很好,谢谢!
jybb001
发表于 2010-3-13 21:27:10
回复 43# 5209520
你是说全自动安装吗?最后一步是我帮故意没做的,方便调试
如果你说是制作安装脚本我这边测试的没有出现你所说的问题,
我这边用自动生成的脚本可以完成自动安装
; -------安装脚本开始--------By jybb001 QQ:576022718
run("E:\down\vodplayer网络媒体播放器3.93正式版-build20090116.exe")
WinWaitActive("安装程序 - 网络媒体播放器")
sleep(960)
ControlClick("安装程序 - 网络媒体播放器","","TButton1")
sleep(880)
ControlClick("安装程序 - 网络媒体播放器","","TRadioButton1")
sleep(640)
ControlClick("安装程序 - 网络媒体播放器","","TButton2")
sleep(1040)
ControlClick("安装程序 - 网络媒体播放器","","TButton3")
sleep(880)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
sleep(2160)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
sleep(800)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
sleep(3920)
ControlClick("安装程序 - 网络媒体播放器","","TButton4")
感谢反馈!
页:
1
2
[3]
4
5
6
7
8
9
10
11
12