20135156 发表于 2013-2-23 21:36:00

条件语句问题 谢谢

电脑管家最后一个窗口总是不能自动激活导致安装过程进行其他操作时候最后一个完成窗口
不是激活状态而无法继续脚本   必须手动激活窗口方可继续请帮忙修改最后红色部分脚本要求判断窗口若是非激活状态则激活它   若还是非激活状态则执行关闭进程命令 最后结束脚本

Run ("qqpcmgr_kzn5156_120154113_v7.4.exe")

WinWaitActive ("电脑管家2合1杀毒版 安装向导","欢迎使用“电脑管家2合1杀毒版”安装向导")
;等待指定窗口被激活后再执行下面的命令
If Not WinActive("电脑管家2合1杀毒版 安装向导","欢迎使用“电脑管家2合1杀毒版”安装向导") Then WinActivate("电脑管家2合1杀毒版 安装向导","欢迎使用“电脑管家2合1杀毒版”安装向导")

ControlClick ("电脑管家2合1杀毒版 安装向导","欢迎使用“电脑管家2合1杀毒版”安装向导","Button2","left","1")
;向指定控件发送鼠标点击命令
WinWaitActive ("电脑管家2合1杀毒版 安装向导 ","阅读授权协议")
;等待指定窗口被激活后再执行下面的命令
If Not WinActive("电脑管家2合1杀毒版 安装向导 ","阅读授权协议")Then WinActivate("电脑管家2合1杀毒版 安装向导 ","阅读授权协议")
ControlClick ("电脑管家2合1杀毒版 安装向导 ","阅读授权协议","Button2","left","1")
;向指定控件发送鼠标点击命令
WinWaitActive ("电脑管家2合1杀毒版 安装向导 ","选择安装位置")
;等待指定窗口被激活后再执行下面的命令
If Not WinActive("电脑管家2合1杀毒版 安装向导 ","选择安装位置")Then WinActivate("电脑管家2合1杀毒版 安装向导 ","选择安装位置")
ControlClick ("电脑管家2合1杀毒版 安装向导 ","选择安装位置","Button2","left","1")
;向指定控件发送鼠标点击命令

WinWaitActive ("电脑管家2合1杀毒版 安装向导 ","“电脑管家2合1杀毒版” 已安装在您的系统")
;等待指定窗口被激活后再执行下面的命令


If Not WinActive ("电脑管家2合1杀毒版 安装向导 ","“电脑管家2合1杀毒版” 已安装在您的系统")Then
       WinActivate("电脑管家2合1杀毒版 安装向导 ","“电脑管家2合1杀毒版” 已安装在您的系统")
      
       ControlClick ("电脑管家2合1杀毒版 安装向导 ","“电脑管家2合1杀毒版” 已安装在您的系统","Button6","left","1")

       Sleep ("200")
       ControlClick ("电脑管家2合1杀毒版 安装向导 ","“电脑管家2合1杀毒版” 已安装在您的系统","Button2","left","1")
      
Else
       If ProcessExists("QQPCMgr_Setup.exe") Then
          ProcessClose("QQPCMgr_Setup.exe")
EndIf      

lxwlxwayy 发表于 2013-2-23 22:48:14

顶一下你的帖

星雨朝霞 发表于 2013-2-24 01:40:20

$Title='电脑管家2合1杀毒版 安装向导'
Run('PCMgr_Setup_75_8430_205.exe')
$Hwnd=WinWait($Title,'欢迎使用“电脑管家2合1杀毒版”安装向导')
ControlClick($Hwnd,'','Button2')
$Hwnd=WinWait($Title,'阅读授权协议')
ControlClick($Hwnd,'','Button2')
$Hwnd=WinWait($Title,'选择安装位置')
ControlSetText($Hwnd,'','Edit1','C:\Program Files\Tencent\QQPCMgr')
ControlClick($Hwnd,'','Button2')
$Hwnd=WinWait($Title,'“电脑管家2合1杀毒版” 已安装在您的系统')
ControlCommand($Hwnd,'','Button4','UnCheck')
ControlCommand($Hwnd,'','Button5','UnCheck')
ControlCommand($Hwnd,'','Button6','UnCheck')
ControlCommand($Hwnd,'','Button7','UnCheck')
ControlClick($Hwnd,'','Button2')

烟雨 发表于 2013-3-23 13:49:36

顶楼上的源码
页: [1]
查看完整版本: 条件语句问题 谢谢