$title= "安装 - 酷狗音乐"
WinWait($title,"欢迎使用")
ControlClick($title,"欢迎使用","下一步(&N) >")
WinWait($title,"许可协议")
ControlClick($title,"许可协议","下一步(&N) >")
WinWait($title,"选择目标位置")
ControlClick($title,"选择目标位置","TNewButton3")
While 1
If WinExists($title," 酷狗音乐推荐安装软件") Then
ControlClick($title," 酷狗音乐推荐安装软件","TNewCheckListBox1")
Sleep(100)
ControlClick($title," 酷狗音乐推荐安装软件","下一步(&N) >")
WinWait($title,"酷狗音乐 安装完毕")
ProcessClose("酷狗.tmp")
FileDelete(@AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\酷狗音乐2010.lnk")
FileDelete(@StartMenuCommonDir & "\酷狗音乐2010.lnk")
Exit
ElseIf WinExists($title,"酷狗音乐 安装完毕") Then
ProcessClose("酷狗.tmp")
FileDelete(@AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\酷狗音乐2010.lnk")
FileDelete(@StartMenuCommonDir & "\酷狗音乐2010.lnk")
Exit
EndIf
WEnd
|