hkzhangt 发表于 2010-5-24 00:21:31

高手帮我看一下软件自动安装中加入不能正常安装?

本帖最后由 hkzhangt 于 2010-5-24 00:22 编辑

这是软件代码
TrayTip("温馨提示","正在进行自动安装,不要进行任何操作,以免出现错误!",5,2)
Run("Office2003SP3三合一.exe")
If WinWait ("Microsoft Office 2003 安装","添加或删除功能(&A)")Then
        Send("{tab}")
        Send("{tab}")
        Send("{enter}")
        WinWait("Microsoft Office 2003 安装","确实要退出 Microsoft Office 2003 安装吗?")
        Send("{TAb}")
        Send("{enter}")
        WinWait("Microsoft Office 2003 安装","Microsoft Office 2003 安装已被取消。")
        Send("{Enter}")
EndIf
WinWait("Microsoft Office 2003 安装","用户信息")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{enter}")
WinWait("Microsoft Office 2003 安装","典型安装(&T)")
Send("!n")
WinWait("Microsoft Office 2003 安装","安装程序准备就绪,将执行以下任务:")
Send("!i")
WinWait("Microsoft Office 2003 安装","安装已完成")
Send("!f")
Exit
不加if语段可以正常的运行,加入以后就会停在下面的那个界面,大家帮我看一下是哪个地方出错了?

ragnada 发表于 2010-5-24 08:26:56

你如果IF的那個視窗一定會出現的話,其實就不用加IF,如果是時有時無的話
If WinWait ("Microsoft Office 2003 安装","添加或删除功能(&A)",3)Then
後面加一個3是代表如果三秒內沒有出現的話,就略過IF內的程式

hkzhangt 发表于 2010-5-24 14:58:59

回复 2# ragnada


    加上等待3秒以后可以正常的安装,但是如果已经安装过就会在下面的那个界面停止运行

jddj 发表于 2010-5-25 01:48:25

回复ragnada


    加上等待3秒以后可以正常的安装,但是如果已经安装过就会在下面的那个界面停止运行 ...

如果出现以上情况,个人认为为了office的稳定,应取消安装,手动删除后再安装。

ragnada 发表于 2010-5-25 08:54:08

回复 3# hkzhangt

這就要再加個判斷試進去判斷這個頁面是否有出現,如果有的話,就先按下移除後再重新呼叫一次office軟體
页: [1]
查看完整版本: 高手帮我看一下软件自动安装中加入不能正常安装?