yamhpsxn 发表于 2010-1-12 18:10:39

暴风影音自动安装脚本

$t="安装"
$T2="暴风影音"
run("Storm.exe")
WinWaitActive($t,"欢迎")
send("!n")
WinWaitActive($t)
Send("!i")
WinWaitActive($t)
send("!n")
WinWaitActive($t)
send("!n")
WinWaitActive($t,"免费的百度工具栏")
ControlClick ($t,"免费的百度工具栏","Button4")
send("!i")
send("!d")
WinWait($t,"皮肤外观")
WinWaitActive($t,"皮肤外观")
send("!n")
WinWaitActive($t,"暴风")
send("{space}")
send("!f")
FileDelete(@DesktopDir&"\免费影视.lnk")
FileDelete(@DesktopDir&"\暴风游戏.lnk")
FileDelete (@AppDataDir&"\Microsoft\Internet Explorer\Quick Launch\暴风游戏.lnk")
FileDelete (@AppDataDir&"\Microsoft\Internet Explorer\Quick Launch\免费影视.lnk")
FileDelete (@AppDataDir&"\Microsoft\Internet Explorer\Quick Launch\暴风影音.lnk")
if WinWaitActive("找不到服务器 - Microsoft Internet Explorer") then WinClose ("找不到服务器 - Microsoft Internet Explorer")

run("C:\Program Files\StormII\Storm.exe")
WinWait($t2,"")
;if WinWaitActive("Windows 安全警报") then send("!u")
MsgBox(4096, "暴风自动安装", "暴风盒子出现后,请点击“确定”按钮",0)
WinWaitActive($t2,"")
WinMove("暴风盒子", "", 525, 0, 476, 490)
MouseClick ( "left" , 988, 14 , 1)
WinMove("暴风影音", "", 0, 0, 524, 490)
MouseClick ( "left" , 417, 15 , 1)
MouseClick ( "left" , 468, 220 , 1)
MouseClick ( "left" , 90, 102 , 1)
MouseClick ( "left" , 191, 325 , 1)
MouseClick ( "left" , 260, 323 , 1)
MouseClick ( "left" , 343, 324 , 1)

MouseClick ( "left" , 54, 233 , 1)
MouseClick ( "left" , 245, 121 , 1)
MouseClick ( "left" , 245, 207 , 1)
MouseClick ( "left" , 182, 388 , 1)

MouseClick ( "left" , 86, 410 , 1)
MouseClick ( "left" , 245, 120 , 1)
MouseClick ( "left" , 245, 154 , 1)
MouseClick ( "left" , 180, 170 , 1)
WinClose($t2, "")
exit

newuser 发表于 2010-3-31 14:32:27

回复 1# yamhpsxn

哪个版本的暴封影音?

fengyuntian 发表于 2010-4-2 11:17:19

同问!:face (21):

lmy20081984 发表于 2010-4-6 15:15:40

ControlClick("腾讯QQ2010 安装向导","请选择安装路径","Button3")
怎么改安装路径，用什么命令，谢谢

komaau3 发表于 2010-9-14 14:32:08

回复 4# lmy20081984
ControlSetText

kunersc 发表于 2010-9-23 11:21:53

正好用的上，谢谢。
页: [1]
查看完整版本: 暴风影音自动安装脚本