[请问]调用迅雷下载时出现“建立新任务”窗口，希望通过findwindow获得句柄，并发送确认操作
[请教]调用迅雷下载时出现“建立新任务”窗口，希望通过findwindow获得句柄，并发送确认操作
调用迅雷下载时出现“建立新的下载任务
”窗口，希望通过findwindow获得句柄，并发送确认操作，但是获得了迅雷的句柄后无法得到“建立新的下载任务
”的句柄，不知道问题出在哪里，希望可以得到大家的帮助，谢谢。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ThunderEng As New THUNDERAGENTLib.Agent '创建讯雷调用对象
ThunderEng.AddTask("http://www.ahau.edu.cn/manage/Article/UploadFiles/200912/20091208120058874.rar", "20091208120058874.rar", "C:\TDDownload\", "任务注释", "引用地址", "-1", "1", "1") '添加下载任务
ThunderEng.CommitTasks() '提交下载任务
'建立新的下载任务
Dim hTemp As Long
hTemp = FindWindow(vbNullString, "迅雷5")
hTemp = FindWindowEx(hTemp, 0, vbNullString, "建立新的下载任务")
MessageBox.Show(hTemp)
End Sub
------解决方案--------------------
http://topic.****.net/u/20080516/13/6d926aad-3a9d-44ec-a25b-df2e4bdac208.html
可以直接设置迅雷
工具-配置-高级，通过IE右键打开任务，去掉不选，然后在调用迅雷的时候 设为自动或迅雷默认就OK了
------解决方案--------------------
你找一下注册表，看相应的如何设置把这个问题转变成，个性注册表的问题就有解了
调用迅雷下载时出现“建立新的下载任务
”窗口，希望通过findwindow获得句柄，并发送确认操作，但是获得了迅雷的句柄后无法得到“建立新的下载任务
”的句柄，不知道问题出在哪里，希望可以得到大家的帮助，谢谢。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ThunderEng As New THUNDERAGENTLib.Agent '创建讯雷调用对象
ThunderEng.AddTask("http://www.ahau.edu.cn/manage/Article/UploadFiles/200912/20091208120058874.rar", "20091208120058874.rar", "C:\TDDownload\", "任务注释", "引用地址", "-1", "1", "1") '添加下载任务
ThunderEng.CommitTasks() '提交下载任务
'建立新的下载任务
Dim hTemp As Long
hTemp = FindWindow(vbNullString, "迅雷5")
hTemp = FindWindowEx(hTemp, 0, vbNullString, "建立新的下载任务")
MessageBox.Show(hTemp)
End Sub
------解决方案--------------------
http://topic.****.net/u/20080516/13/6d926aad-3a9d-44ec-a25b-df2e4bdac208.html
可以直接设置迅雷
工具-配置-高级，通过IE右键打开任务，去掉不选，然后在调用迅雷的时候 设为自动或迅雷默认就OK了
------解决方案--------------------
你找一下注册表，看相应的如何设置把这个问题转变成，个性注册表的问题就有解了