找回密码
 加入
搜索
查看: 19579|回复: 19

[原创] i-Aotit 自动安装 一键GHOST硬盘版2010.10.10

[复制链接]
发表于 2011-5-6 14:19:10 | 显示全部楼层 |阅读模式
本帖最后由 wurich614 于 2011-5-15 16:03 编辑

i-Aotit 后修改添加 有什么不对的地方给下提示 谢谢
5月9日增加win_lan.exe - 应用程序错误判断
5月15日修改win_lan.exe的判断方法
;本脚本由i-Autoit-1.01 正式版 生成 ,非常感谢您的使用,请保留此脚本声明!  2011年05月06日

;--------------------------------------------------------------;脚本开始
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= "一键GHOST 安装程序" 
$WinTitle_2= "win_lan.exe - 应用程序错误" 
$Wintxt_1= "下一步(&N) >"
$Wintxt_2= "许可协议:"
$Wintxt_3= "安装百度工具栏"
$Wintxt_4= "下一步(&N) >"
$Wintxt_5= "确定"
$Wintxt_6= "设置“doshome.com 网址导航”为主页"
;--------------------------------------------------------------;窗口元素变量声明

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

$Exe = '一键GHOST硬盘版2010.10.10.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, "Button3")   ;下一步(&N) >

WinWaitActive($WinTitle_1, $Wintxt_2)
ControlClick($WinTitle_1, $Wintxt_2, "Button1")   ;许可协议:

WinWaitActive($WinTitle_1, $Wintxt_3)
ControlClick($WinTitle_1, $Wintxt_3, "Button33")   ;百度工具栏
ControlClick($WinTitle_1, $Wintxt_3, "Button1")   ;下一步(&N) >

WinWaitActive($WinTitle_1, $Wintxt_4)
ControlClick($WinTitle_1, $Wintxt_4, "Button1")   ;下一步(&N) >

Do 
  If WinExists($WinTitle_2, $Wintxt_5) Then            ;如果发现win_lan.exe - 应用程序错误 则
     ControlClick($WinTitle_2, $Wintxt_5, "Button1")   ;点确定
     FileSetAttrib ( "C:\dosh", "+H")                    ;win_lan.exe错误会导致C:\dosh不隐藏 这里加隐藏
  Else
     sleep(1000)
  EndIf
Until ProcessExists("IEXPLORE.EXE")

;[查杀进程]
ProcessClose("IEXPLORE.EXE")


WinWaitActive($WinTitle_1, $Wintxt_6)
ControlClick($WinTitle_1, $Wintxt_6, "Button32")   ;立即运行 一键GHOST
ControlClick($WinTitle_1, $Wintxt_6, "Button34")   ;设置“doshome.com 网址导航”为主页
ControlClick($WinTitle_1, $Wintxt_6, "Button1")   ;完成(&F)

;FileCopy ( "1KG_su.exe", "C:\dosh\ghos",1)
;FileCopy ( "gho_run.exe", "C:\dosh\ghos",1)
;--------------------------------------------------------------;两个破解文件 可复制进去


;[删除文件]
FileDelete (""&@DesktopDir&"\一键GHOST.lnk") ;--------删除文件--------
发表于 2011-5-6 15:01:37 | 显示全部楼层
好猛好厉害·
发表于 2011-6-9 17:54:47 | 显示全部楼层
本帖最后由 beyotang 于 2011-6-9 17:56 编辑

楼主麻烦帮我看看,我用了你的代码,直接用编译好的自动安装脚本没问题。可是我用我的软件安装管理器就出问题了,不管怎么弄最后拷贝破解文件都不成功。麻烦帮我看看,我的软件安装管理器在附件里。谢谢!!!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×
发表于 2011-6-18 15:54:35 | 显示全部楼层
如何知道软件安装界面上的控件是什么名称?
发表于 2011-7-24 11:25:05 | 显示全部楼层
谢谢 我学到了很多
发表于 2011-8-1 17:53:47 | 显示全部楼层
支持一下吧
发表于 2011-12-9 16:49:21 | 显示全部楼层
学习啦,谢谢楼主
发表于 2011-12-22 11:15:33 | 显示全部楼层
AU3功能太强大!!!要加紧学习!
发表于 2011-12-24 17:27:29 | 显示全部楼层
来看下效果!
发表于 2012-7-30 10:47:32 | 显示全部楼层
如何知道软件安装界面上的控件是什么名称?
发表于 2013-3-26 10:55:06 | 显示全部楼层
回复 10# 5366286 jiance
检测不久能看到了啊
发表于 2014-7-10 23:27:30 | 显示全部楼层
貌似很不错 嘿嘿
发表于 2014-7-10 23:27:44 | 显示全部楼层
有没有附件
发表于 2015-11-9 20:20:29 | 显示全部楼层
学习。。。。。。。。。。。。
发表于 2016-1-9 16:10:23 | 显示全部楼层
支持~~支持~~












生活词典http://www.cidiancn.com
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-3-29 15:05 , Processed in 0.076091 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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