请高手帮忙,遇到奇怪的问题。
本帖最后由 beyotang 于 2011-6-10 10:06 编辑我用了此帖里的代码,http://www.autoitx.com/thread-24426-1-1.html
去掉了拷贝两个破解文件代码前面的分号,直接编译自动安装没问题。
但是我用我的软件安装管理器调用此自动安装脚本的时候,最后一步拷贝两个破解文件始终不成功。实在是解决不了,请高手相助!谢谢!
软件安装管理器在附件里,请高手帮忙测试;本脚本由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") ;--------删除文件-------- 啥問題 不清楚
页:
[1]