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

[原创] i-Aotit 自动安装 WPS Office 抢鲜版V3.1

[复制链接]
发表于 2011-5-6 14:34:21 | 显示全部楼层 |阅读模式
i-Aotit 后修改添加 有什么不对的地方给下提示 谢谢
;--------------------------------------------------------------;脚本开始
Opt("TrayIconDebug", 1) ;0=无信息, 1=调试信息                   ;托盘代码提示
Opt("WinTextMatchMode", 1) ;1=完全匹配, 2=快速匹配              ;文字匹配方式
Opt("WinTitleMatchMode", 1) ;1=开头, 2=子串, 3=完全, 4=高级     ;标题匹配方式
Opt("WinSearchChildren", 1) ;0=不搜索, 1=搜索子窗口             ;检测子窗口
Opt("WinDetectHiddenText", 1) ;0=不检测, 1=检测                 ;检测隐藏文字
;--------------------------------------------------------------;设置脚本参数
Opt("MouseCoordMode", 0)     ;相对激活窗口的坐标 

$WinTitle_1= "WPS Office 个人版"  
$Wintxt_1= "开始安装(&I)"
$Wintxt_2= "确定"
;--------------------------------------------------------------;窗口元素变量声明

TrayTip ( "温馨提示", "正在自动安装请不要动鼠标键盘"&@CRLF&"反馈http://www.joz7.com",5,4) 
;--------------------------------------------------------------;右下角气泡提示

$Exe = 'WPS2010_setup.exe'
If ProcessExists($Exe) Then ProcessClose($Exe)
If Run($Exe) = 0 Then ShellExecute($Exe)

Do
        Sleep(10);
Until WinExists($Wintitle_1)
;WinMove($Wintitle_1, "", -1000, -1000)
;--------------------------------------------------------------;程序启动,显示界面

WinWaitActive($WinTitle_1, $Wintxt_1)
ControlClick($WinTitle_1, $Wintxt_1, "Button2")   ;开始安装(&I)

WinWaitActive($WinTitle_1, $Wintxt_2)
ControlClick($WinTitle_1, $Wintxt_2, "TTntButton.UnicodeClass1")   ;确定


;[查杀进程]
If ProcessExists("IEXPLORE.EXE") Then 
   ProcessClose("IEXPLORE.EXE")
EndIf ;--------查杀进程--------


If ProcessExists("wps.exe") Then 
   ProcessClose("wps.exe")
EndIf ;--------查杀进程--------


;[删除文件]
FileDelete ("C:\Documents and Settings\All Users\桌面\WPS文字.lnk") ;--------删除文件--------
FileDelete ("C:\Documents and Settings\All Users\桌面\WPS表格.lnk") ;--------删除文件--------
FileDelete ("C:\Documents and Settings\All Users\桌面\WPS演示.lnk") ;--------删除文件--------
发表于 2011-5-6 16:57:49 | 显示全部楼层
好像不很实用哦
 楼主| 发表于 2011-5-6 18:48:14 | 显示全部楼层
回复 2# 楼上风云


    额 哪里出错了啊
发表于 2011-5-17 15:44:54 | 显示全部楼层
3123123123

评分

参与人数 1金钱 -20 收起 理由
水木子 -20

查看全部评分

发表于 2011-10-24 10:31:56 | 显示全部楼层
好好学习 天天向上  
收藏下
发表于 2011-10-28 11:14:58 | 显示全部楼层
我也收藏下,谢谢
发表于 2012-3-22 15:39:49 | 显示全部楼层
楼主在辛苦一下,做一下WPS的2012版本贡献一下
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-3-29 22:01 , Processed in 0.077201 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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