basketballkun 发表于 2010-4-14 18:37:53

关于迅雷 5.9.16.1306 版本的自动安装问题

哪位大侠能跟大家分享下
:face (29)::face (23):

nmgwddj 发表于 2010-4-14 18:52:25

自己做嘛 遇到问题再来问。伸手就要 这不是个好习惯:face (22):

查无此人 发表于 2010-4-14 20:19:29

首先要自己写，遇到问题再问。
用别人写好的源码，自己永远都不会

basketballkun 发表于 2010-4-17 17:10:48

楼上的。。难道你很厉害吗。。你还不是一样，难道你就不是看我们写的你才去学的吗。。

basketballkun 发表于 2010-4-17 17:11:32

这个网站还不是你看我在看你才进来的

xz00311 发表于 2010-4-18 21:42:47

本帖最后由 xz00311 于 2010-4-18 21:44 编辑

你自己先写一下吗这个应该不难，我看了一下不难控件都可以获取到

yhxhappy 发表于 2010-4-18 22:38:41

大概写了一个，没什么仔细验证，希望能帮上忙If ProcessExists("Thunder.exe") <> 0 Then
        ProcessWaitClose("Thunder.exe")
EndIf

;Run("xxxxxxx.exe")      ;安装文件路径

WinWait("迅雷5 : 用户使用协议","欢迎使用 迅雷5 安装向导")
WinActivate("迅雷5 : 用户使用协议","欢迎使用 迅雷5 安装向导")
ControlClick("迅雷5 : 用户使用协议","欢迎使用 迅雷5 安装向导","Button2","left")

WinWait("迅雷5: 安装选项","选择附加任务")
WinActivate("迅雷5: 安装选项","选择附加任务")
;ControlSetText("迅雷5: 安装选项","选择附加任务", "Edit1", "C:\Program Files\Thunder Network\Thunder")       ;如果需要自定义路径，请自己改后面的路径
ControlClick("迅雷5: 安装选项","选择附加任务","Button2","left")

If If WinExists("迅雷5","文件夹已存在, 是否覆盖?") = 1 Then
        WinWait("迅雷5","文件夹已存在, 是否覆盖?")
        WinActivate("迅雷5","文件夹已存在, 是否覆盖?")
        ControlClick("迅雷5","文件夹已存在, 是否覆盖?","Button1","left")
EndIf

WinWait("迅雷5: 安装完成","迅雷5安装程序已完成安装")
WinActivate("迅雷5: 安装完成","迅雷5安装程序已完成安装")
ControlClick("迅雷5: 安装完成","迅雷5安装程序已完成安装","Button5","left")
ControlClick("迅雷5: 安装完成","迅雷5安装程序已完成安装","Button6","left")
ControlClick("迅雷5: 安装完成","迅雷5安装程序已完成安装","Button7","left")
Sleep(200)
ControlClick("迅雷5: 安装完成","迅雷5安装程序已完成安装","Button2","left")

basketballkun 发表于 2010-4-22 13:34:54

控件要怎么弄才能获取到

   谢谢~！

C.L 发表于 2010-4-22 15:18:26

回复 8# basketballkun

用Au3Info.exe来获取

myloveqmx 发表于 2010-4-22 17:19:58

搜索一下，网上有相关的软件自动安装的视频教程
页: [1]
查看完整版本: 关于迅雷 5.9.16.1306 版本的自动安装问题