找回密码
 加入
搜索
查看: 6532|回复: 6

[原创] 搜狗拼音5.2

[复制链接]
发表于 2011-2-16 23:20:08 | 显示全部楼层 |阅读模式
2011年2月16日最新版,新做的不太会,但还是愿意分享一下。高手略过。已下是源码,软件自已官网下吧。
Run("搜狗拼音5.2.exe")

WinWaitActive("搜狗拼音输入法 5.2正式版 安装","欢迎使用“搜狗拼音输入法 5.2正式版”")
ControlClick("搜狗拼音输入法 5.2正式版 安装","欢迎使用“搜狗拼音输入法 5.2正式版”","Button2")


WinWaitActive("搜狗拼音输入法 5.2正式版 安装","许可证协议")
ControlClick("搜狗拼音输入法 5.2正式版 安装","许可证协议","Button2")

WinWaitActive("搜狗拼音输入法 5.2正式版 安装","目标文件夹")
Send("d:\Program Files\SogouInput")
ControlClick("搜狗拼音输入法 5.2正式版 安装","目标文件夹","Button2")


If WinExists("搜狗拼音输入法 5.2正式版 安装","选择“开始菜单”文件夹,以便创建程序的快捷方式") Then
ControlClick("搜狗拼音输入法 5.2正式版 安装","选择“开始菜单”文件夹,以便创建程序的快捷方式","Button2")
EndIf       

If WinExists("搜狗拼音输入法 5.2正式版 安装","选择是否安装附加软件搜狗浏览器") Then
ControlClick("搜狗拼音输入法 5.2正式版 安装","选择是否安装附加软件搜狗浏览器","Button4")
ControlClick("搜狗拼音输入法 5.2正式版 安装","选择是否安装附加软件搜狗浏览器","Button2")
EndIf       


WinWaitActive("搜狗拼音输入法 5.2正式版 安装","安装完毕")
ControlClick("搜狗拼音输入法 5.2正式版 安装","安装完毕","Button1")


ProcessWait("iexplore.exe")
ProcessClose("iexplore.exe")

WinWaitActive("搜狗拼音输入法 个性化设置向导","< 上一步(&B)")
ControlClick("搜狗拼音输入法 个性化设置向导","< 上一步(&B)","Button2")

WinWaitActive("搜狗拼音输入法 个性化设置向导","模糊音设置")
ControlCommand("搜狗拼音输入法 个性化设置向导","模糊音设置","ComboBox2","SelectString","9")
ControlClick("搜狗拼音输入法 个性化设置向导","模糊音设置","Button2")

WinWaitActive("搜狗拼音输入法 个性化设置向导","< 上一步(&B)")
ControlClick("搜狗拼音输入法 个性化设置向导","< 上一步(&B)","Button2")

WinWaitActive("搜狗拼音输入法 个性化设置向导","反选")
ControlClick("搜狗拼音输入法 个性化设置向导","反选","Button5")
ControlClick("搜狗拼音输入法 个性化设置向导","反选","Button2")

WinWaitActive("搜狗拼音输入法 个性化设置向导","立即启用")
ControlClick("搜狗拼音输入法 个性化设置向导","立即启用","Button2")

WinWaitActive("搜狗拼音输入法 个性化设置向导","立即登录输入法账户")
ControlClick("搜狗拼音输入法 个性化设置向导","立即登录输入法账户","Button2")

WinWaitActive("搜狗拼音输入法 个性化设置向导","退出向导(&C)")
ControlClick("搜狗拼音输入法 个性化设置向导","退出向导(&C)","Button2")


Exit
发表于 2011-4-9 22:47:54 | 显示全部楼层
刚才试了一下,安装完成后到设置向导就暂停了,请楼主看一下。
发表于 2011-4-10 23:00:35 | 显示全部楼层
好长时间没上来了,顶一下
发表于 2011-4-18 08:38:03 | 显示全部楼层
“个性化设置向导”,在不同环境下有点不太一样
发表于 2011-4-18 08:39:03 | 显示全部楼层
我的是这样


FileInstall("sogou_pinyin_52b.exe", @TempDir & "\sogou_pinyin_52b.exe", 1)
Run(@TempDir & "\sogou_pinyin_52b.exe")
WinWait("搜狗拼音输入法 5.2正式版 安装")
If WinExists("搜狗拼音输入法 5.2正式版 安装", "您的系统里已经安装了最新版或相同版本。") Then
        WinActivate("搜狗拼音输入法 5.2正式版 安装", "您的系统里已经安装了最新版或相同版本。")
        ControlClick("搜狗拼音输入法 5.2正式版 安装", "您的系统里已经安装了最新版或相同版本。", "Button1")
EndIf
WinWait("搜狗拼音输入法 5.2正式版 安装", "欢迎使用“搜狗拼音输入法 5.2正式版”")
WinActivate("搜狗拼音输入法 5.2正式版 安装", "欢迎使用“搜狗拼音输入法 5.2正式版”")
ControlClick("搜狗拼音输入法 5.2正式版 安装", "欢迎使用“搜狗拼音输入法 5.2正式版”", "Button2")
WinWait("搜狗拼音输入法 5.2正式版 安装", "许可证协议")
WinActivate("搜狗拼音输入法 5.2正式版 安装", "许可证协议")
ControlClick("搜狗拼音输入法 5.2正式版 安装", "许可证协议", "Button2")
WinWait("搜狗拼音输入法 5.2正式版 安装", "选择安装位置")
WinActivate("搜狗拼音输入法 5.2正式版 安装", "选择安装位置")
ControlClick("搜狗拼音输入法 5.2正式版 安装", "选择安装位置", "Button2")
WinWait("搜狗拼音输入法 5.2正式版 安装", "选择“开始菜单”文件夹")
WinActivate("搜狗拼音输入法 5.2正式版 安装", "选择“开始菜单”文件夹")
ControlClick("搜狗拼音输入法 5.2正式版 安装", "选择“开始菜单”文件夹", "Button2")
WinWait("搜狗拼音输入法 5.2正式版 安装")
If WinExists("搜狗拼音输入法 5.2正式版 安装", "选择安装“附加软件”") Then
        WinActivate("搜狗拼音输入法 5.2正式版 安装", "选择安装“附加软件”")
        ControlClick("搜狗拼音输入法 5.2正式版 安装", "选择安装“附加软件”", "Button4")
        ControlClick("搜狗拼音输入法 5.2正式版 安装", "选择安装“附加软件”", "Button2")
EndIf
WinWait("搜狗拼音输入法 5.2正式版 安装", "安装完毕")
WinActivate("搜狗拼音输入法 5.2正式版 安装", "安装完毕")
ControlClick("搜狗拼音输入法 5.2正式版 安装", "安装完毕", "Button1")
WinWait("搜狗拼音输入法 个性化设置向导")
WinClose("搜狗拼音输入法 个性化设置向导")
If ProcessExists("IEXPLORE.EXE") Then
        ProcessClose("IEXPLORE.EXE")
EndIf
发表于 2012-1-16 09:18:46 | 显示全部楼层
我测试一下可以用的
发表于 2012-7-30 10:58:51 | 显示全部楼层
我是个新手,能帮我解释下这段是什么意思吗?
FileInstall("sogou_pinyin_52b.exe", @TempDir & "\sogou_pinyin_52b.exe", 1)
Run(@TempDir & "\sogou_pinyin_52b.exe")
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-3-29 21:25 , Processed in 0.073753 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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