|
本帖最后由 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群号什么的。。。 |
|