找回密码
 加入
搜索
查看: 1694|回复: 3

[AU3基础] AU 新手求下步指示(一键安装软件基本毕业)

[复制链接]
发表于 2011-2-24 08:43:03 | 显示全部楼层 |阅读模式
本帖最后由 bwq5779 于 2011-2-24 08:45 编辑

大家好。
我通过编写一键自动安装软件才认识到au3,的确很强大
先总结下编写所需的au3 代码如下:
(比我还新手的有点帮助)

Dim $Title="安装…… "    -窗口标题
Dim $Text="欢迎使用…… 安装向导"      -窗口关键词
TrayTip("提示", "准备安装……"&@CRLF&"自动安装期间,请勿动键盘鼠标", 5, 1)
Sleep(2000)          -右下角弹出提示
Run("安装程序.exe")     -运行安装程序
WinWaitActive($Title,$Text)              -等待激活窗口
ControlClick($Title,$Text,"TButton2")    - 窗口 关键词 点击下一步
--- 依次安排下去

中途可能会用到的

While 1
    If ProcessExists("iexplore.exe") Then
        ProcessClose("iexplore.exe")
        ExitLoop
    EndIf
WEnd                -关闭 (ie) 进程

If WinWait($Title,$Text1) Then
        WinActivate($Title,$Text1)
EndIf           -窗口未激活 需要先激活下

破解所需的 (:
FileDelete($FileA)         - $file  文件所在路径   删除原安装路径
FileCopy ($Filea,$FileA)   -复制破解文件
Run("regsvr32"&Chr(32)&"/s"&Chr(32)&$Filea)     注册

有点搬门弄斧了。
我目前遇到瓶颈,不知下一步学习什么
望前辈指示,给点给力教程什么的,实例。
最好适合基本应用 比如远程计算机查看/备份数据等等 !
有志同道合的给个qq群号什么的。。。
发表于 2011-2-24 20:34:01 | 显示全部楼层
去看看如果自动安装过程中有列表的情况吧,简单的模拟按键有什么好学的
发表于 2011-2-24 20:52:22 | 显示全部楼层
值得鼓励!继续加油!
发表于 2011-2-25 00:21:04 | 显示全部楼层
值得鼓励!继续加油!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-12-26 22:53 , Processed in 0.082081 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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