au3 自动安装程序制作视频教程
<p>视频教程下载http://pan.baidu.com/share/link?shareid=1651633926&uk=67562577</p><p>用到的程序下载<a href="download/au3.7z">au3.7z</a></p><p>说明:</p><p>1.其实这个东西挺简单的,看看就会,本来不打算出教程,但是某网友纠结,只好做了</p><p>2.由于教程在虚拟机下录制,只有一个分区,视频中测试的时候提示目录不存在,实际使用中不会有问题</p><p>教程中改好的代码</p><div class="blockcode"><blockquote>#requireadmin<br>traytip(" 鱼雁可提示","自动安装期间为避免操作失败,请勿动键盘鼠标",30,4)<br><br>Local $InstallPath<br>If $Cmdline <> 0 Then<br>$InstallPath = $Cmdline<br>EndIf<br>Run(@ScriptDir & "\QQ2011Beta3_Dmcl.exe")<br>WinWait("腾讯QQ2011 安装向导","在安装软件前, 请仔细阅读下面的软件许可协议和青少年上网安全指引。")<br>WinActivate("腾讯QQ2011 安装向导","在安装软件前, 请仔细阅读下面的软件许可协议和青少年上网安全指引。")<br>WinWaitActive("腾讯QQ2011 安装向导","在安装软件前, 请仔细阅读下面的软件许可协议和青少年上网安全指引。")<br>ControlClick("腾讯QQ2011 安装向导","我已阅读并同意软件许可协议和青少年上网安全指引","Button1")<br>Send("!N")<br>WinActivate("腾讯QQ2011 安装向导","快捷方式选项")<br>WinWaitActive("腾讯QQ2011 安装向导","快捷方式选项")<br>Send("!N")<br>WinActivate("腾讯QQ2011 安装向导","请选择安装路径")<br>WinWaitActive("腾讯QQ2011 安装向导","请选择安装路径")<br>ControlSetText("腾讯QQ2011 安装向导","请选择安装路径","Edit1","D:\Program Files\Tencent\QQ")<br>Send("!I")<br>WinActivate("腾讯QQ2011 安装向导","安装完成")<br>WinWaitActive("腾讯QQ2011 安装向导","安装完成")<br>ControlClick("腾讯QQ2011 安装向导","安装完成","立即运行腾讯QQ2011")<br>Send("!F")<br>Exit</blockquote></div><br> 不错不错!!!!!!!!!!!!!!!!!!!!大哥,你要是能在后面加个括号,然后来点中文注解就好了! Local $InstallPath
If $Cmdline <> 0 Then
$InstallPath = $Cmdline
(就比如这里大体的意思是什么?) {:soso__13914292892282080364_4:}有点卡了 靓.. 发表于 2011-8-18 19:22 static/image/common/back.gif
有点卡了
? 靓.. 发表于 2011-8-18 19:22 static/image/common/back.gif
有点卡了
我这都快卡死了 nkc3g4 发表于 2011-8-18 21:36
我这都快卡死了
怎么卡死的-.- nkc3g4 发表于 2011-8-18 21:36
我这都快卡死了
金钱不能加。都给你奖励这么多金钱了。