找回密码
 加入
搜索
查看: 3395|回复: 5

[原创] 搜狗6.1自动安装源码 我的第一个AU3脚本,大家看看有什么不足的地方

  [复制链接]
发表于 2012-1-30 02:24:23 | 显示全部楼层 |阅读模式
#PRE_Icon=搜狗.exe
Opt("MustDeclareVars",1)


_Main()

Exit

Func _Main()
       
        Local $Path=""
        If $Cmdline[0]>=1 Then
                DirCreate($Cmdline[1])
                If FileExists($Cmdline[1]) Then
                $Path=$Cmdline[1]
        EndIf
EndIf

Run(@ScriptDir & "\搜狗.exe")

Local $Title="搜狗拼音输入法 6.1正式版 安装"
SendKeepActive($Title)

Local $Text1="欢迎使用“搜狗拼音输入法 6.1正式版”"
WinWait($Title,$Text1)
WinActivate($Title,$Text1)
Send("!N")

Local $Text2="许可证协议"
WinWait($Title,$Text2)
WinActivate($Title,$Text2)
Send("!I")

Local $Text3="选择安装位置"
WinWait($Title,$Text3)
WinActivate($Title,$Text3)

If $Path<>""Then
        Send($Path)
EndIf
Send("!N")

Local $Text4="选择“开始菜单”文件夹"
WinWait($Title,$Text4)
WinActivate($Title,$Text4)
Send("!I")

Local $Text5="安装完毕"
WinWait($Title,$Text5)
WinActivate($Title,$Text5)
Send("{Down}")
Send("{SPACE}")
Send("!F")

EndFunc

评分

参与人数 1金钱 +10 收起 理由
lpxx + 10 我很赞同

查看全部评分

发表于 2012-1-30 13:30:34 | 显示全部楼层
我来支持一下你的作品
发表于 2012-7-1 20:39:49 | 显示全部楼层
楼主能否解释下 上面的量是啥意思
发表于 2012-7-2 02:03:55 | 显示全部楼层
支持楼主第一程序
发表于 2012-7-3 17:54:01 | 显示全部楼层

支持!

发表于 2012-7-4 11:01:05 | 显示全部楼层
你的我有些看不懂啊,我也是刚开始写自动安装。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-21 19:28 , Processed in 0.082192 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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