adsen2009 发表于 2009-6-29 23:11:59

发个迅雷 v5.8.11.686绿色版的自动安装

我不太勤快，能少点一次鼠标就少点一次鼠标吧

Run("Thunder5.exe")
If ProcessExists("@绿化工具.exe") Then
        ProcessClose("@绿化工具.exe")
EndIf

Run(@ProgramFilesDir & "\Thunder5\@绿化工具.exe")
WinWaitActive("迅雷 v5.8.11.686", "该版支持迅雷看看")
ControlClick("迅雷 v5.8.11.686", "该版支持迅雷看看", "Button7")
WinWaitActive("迅雷 v5.8.11.686", "绿化完成")
Send("{ENTER}")
WinKill("迅雷 v5.8.11.686", "该版支持迅雷看看")

lvsea2008 发表于 2009-6-30 00:58:07

的却很方便的哈

5604 发表于 2009-7-7 22:54:02

支持楼主提供分享。

xytjc 发表于 2009-7-21 17:56:01

LLLOOOOOOOOOOOOK
页: [1]
查看完整版本: 发个迅雷 v5.8.11.686绿色版的自动安装