|
再发一个,也是新做的,新手啊,高手略过,同等次的愿意切磋。
都是2011.2.16最新版的啊。
Run("PPS V2.7.0.1210.exe")
WinWaitActive("PPS影音 V2.7.0.1210 正式版","PPS影音 安装向导")
ControlClick("PPS影音 V2.7.0.1210 正式版","PPS影音 安装向导","Button3")
WinWaitActive("PPS影音 V2.7.0.1210 正式版","选择附加任务")
Send("{TAB}{TAB}{TAB}")
WinWaitActive("PPS影音 V2.7.0.1210 正式版","选择附加任务")
Send("d:\Program Files\PPStream")
ControlClick("PPS影音 V2.7.0.1210 正式版","选择附加任务","Button6")
ControlClick("PPS影音 V2.7.0.1210 正式版","选择附加任务","Button7")
ControlClick("PPS影音 V2.7.0.1210 正式版","选择附加任务","Button8")
ControlClick("PPS影音 V2.7.0.1210 正式版","选择附加任务","Button3")
If WinExists("PPS影音 V2.7.0.1210 正式版") Then
ControlClick("PPS影音 V2.7.0.1210 正式版","","Button1")
EndIf
WinWaitActive("PPS影音 V2.7.0.1210 正式版","选择文件关联")
ControlClick("PPS影音 V2.7.0.1210 正式版","选择文件关联","Button3")
If WinExists("安装 Google 工具栏") Then
ControlClick("安装 Google 工具栏","","Button4")
ControlClick("安装 Google 工具栏","","Button3")
EndIf
If WinExists("PPS影音 V2.7.0.1210 正式版","选择推荐软件") Then
ControlClick("PPS影音 V2.7.0.1210 正式版","选择推荐软件","Button8")
ControlClick("PPS影音 V2.7.0.1210 正式版","选择推荐软件","Button3")
EndIf
WinWaitActive("PPS影音 V2.7.0.1210 正式版","PPS影音已成功安装在您的系统中")
ControlClick("PPS影音 V2.7.0.1210 正式版","PPS影音已成功安装在您的系统中","Button4")
ControlClick("PPS影音 V2.7.0.1210 正式版","PPS影音已成功安装在您的系统中","Button3")
sleep(500)
ProcessWait("iexplore.exe")
ProcessClose("iexplore.exe")
Exit |
|