myang 发表于 2011-2-25 00:11:17

自动安装出错，请大大们帮忙看下(已解决）

本帖最后由 myang 于 2011-2-28 15:15 编辑

Run("Office2003_3in1.exe")
WinWaitActive("Office2003 3in1 安装","下一步(&N) >")
Send ("!N")
WinWaitActive("Office2003 3in1 安装","选择组件")
Send ("!N")
ControlClick("Office2003 3in1 安装 ","SysTreeView321","left",1,13, 74)
Send ("!I")
If WinActive("Microsoft Office 2003 安装","用户信息") Then
        Send ("!N")
WinWaitActive("Microsoft Office 2003 安装","安装类型")       
Send ("!N")
WinWaitActive("Microsoft Office 2003 安装","摘要")
Send ("!I")
WinWaitActive("Microsoft Office 2003 安装","安装已完成")
Send ("!F")
ElseIf WinActive("Microsoft Office 2003 安装","维护模式选项") Then
        WinWaitActive("Microsoft Office 2003 安装","维护模式选项")
      Send ("!R")
          Send ("!N")
          WinWaitActive("Microsoft Office 2003 安装","重新安装或修复 Office")
          Send ("!E")
          Send ("!I")
      WinWaitActive("Microsoft Office 2003 安装","Microsoft Office 2003 已被成功地修复。")
      ControlClick("Microsoft Office 2003 安装","Microsoft Office 2003 已被成功地修复。","Button1")
          WinWaitActive("Microsoft Office 2003 安装","重新启动计算机后，对 Microsoft Office Professional Edition 2003 信念版 所做的设置修改才能生效。是否立即重启动?")
          ControlClick("Microsoft Office 2003 安装","重新启动计算机后，对 Microsoft Office Professional Edition 2003 信念版 所做的设置修改才能生效。是否立即重启动?","Button2")
EndIf
卡在下面这张图。。。。。。。。。。

小A 发表于 2011-2-25 00:41:46

回复 1# myang
ControlClick('Microsoft Office 2003 安装','','');添加或删除功能
ControlClick('Microsoft Office 2003 安装','','');重新安装或修复
ControlClick('Microsoft Office 2003 安装','','');卸载
;=====================================================================
ControlClick('Microsoft Office 2003 安装','','');下一步
楼主试试这段代码

myang 发表于 2011-2-25 00:52:45

还是不行。。。。

dearmb 发表于 2011-2-25 07:33:07

回复 3# myang


   我觉得是IF和elseif后面的语句有问题
我认为你既然不知道会出什么窗口，直接winactive会不会太快了，不能sleep一会么？

hzxymkb 发表于 2011-2-25 09:43:09

你是要删除？还是安装？
安装有参数的

myang 发表于 2011-2-26 23:48:35

本帖最后由 myang 于 2011-2-26 23:50 编辑

我是要安装。。。。。麻烦楼上的大大指点下。

myang 发表于 2011-2-26 23:51:56

你是要删除？还是安装？
安装有参数的
hzxymkb 发表于 2011-2-25 09:43 http://www.autoitx.com/images/common/back.gif


    本帖最后由 myang 于 2011-2-26 23:50 编辑

我是要安装。。。。。麻烦楼上的大大指点下

hzxymkb 发表于 2011-3-1 13:03:23

加入参数就可以自动安装了！
"【显示选项】
/quiet - 安静模式，无用户交互
/passive - 无人参与模式，只显示进度栏
/qn - 无用户界面
/qb - 基本界面
/qr - 精简界面
/qf - 完整界面(默认值)
【重新启动选项】
/norestart - 安装完成后不重新启动
/promptrestart - 必要时提示用户重新启动
/forcerestart - 安装后始终重新启动计算机"


你直接加入/QR就可以了！我上次也是这样子

myang 发表于 2011-3-2 13:26:05

本帖最后由 myang 于 2011-3-2 13:27 编辑

加入参数就可以自动安装了！
"【显示选项】
/quiet - 安静模式，无用户交互
/passive - 无人参与模式，只 ...
hzxymkb 发表于 2011-3-1 13:03 http://www.autoitx.com/images/common/back.gif


    谢谢了，来论坛时间不长，得到了很多老师的帮助，再次感谢hzxymkb
页: [1]
查看完整版本: 自动安装出错，请大大们帮忙看下(已解决）