迅雷的可视化下载

悠悠 2022-07-10 05:56 299阅读 0赞

最近用迅雷，右键选择“使用迅雷下载全部链接”，会有一个可视化框方式进行下载的选择框：

![0_1278247513U0KB.gif][]

点击“是”之后，就会进行像qq截图的区域选择。迅雷可以将这个区域里面的链接提取出来，然后全部下载下来。

这种方式确实比较有用，我比较关心这是如何实现的？

在注册表“HKEY\_CURRENT\_USER/Software/Microsoft/Internet Explorer/MenuExt/使用迅雷下载全部链接”下面，显示处理“使用迅雷下载全部链接”，的url是e:/Program Files/Thunder Network/Thunder/Program/GetAllUrl.htm，文件内容如下：

Sub OnContextMenu()  
set ThunderAgent = CreateObject("ThunderAgent.Agent.1")

If ThunderAgent.ConfirmRectMode = 0 Then  
set links = external.menuArguments.document.links  
set images = external.menuArguments.document.images  
link\_count = links.length  
image\_count = images.length

strDownloadPage = external.menuArguments.document.url  
set theDownloadPage = external.menuArguments.document.getElementById("thunder\_down\_pageurl")  
if TypeName(theDownloadPage) <> "Nothing" then  
strDownloadPage = theDownloadPage.value  
end if

strStatPage = ""  
set theStatPage = external.menuArguments.document.getElementById("thunder\_stat\_pageurl")  
if TypeName(theStatPage) <> "Nothing" then  
strStatPage = theStatPage.value  
end if

if strStatPage <> "" then  
for i = 0 to link\_count-1  
call ThunderAgent.AddTask4(links(i).href, "", "", links(i).innerText, strDownloadPage, -1, 0, -1, external.menuArguments.document.cookie, "", strStatPage)  
next  
for i = 0 to image\_count-1  
call ThunderAgent.AddTask4(images(i).src, "", "", images(i).innerText, strDownloadPage, -1, 0, -1, external.menuArguments.document.cookie, "", strStatPage)  
next  
else  
for i = 0 to link\_count-1  
call ThunderAgent.AddTask4(links(i).href, "", "", links(i).innerText, strDownloadPage, -1, 0, -1, external.menuArguments.document.cookie, "", "")  
next  
for i = 0 to image\_count-1  
call ThunderAgent.AddTask4(images(i).src, "", "", images(i).innerText, strDownloadPage, -1, 0, -1, external.menuArguments.document.cookie, "", "")  
next  
end if

call ThunderAgent.CommitTasks2(1)  
Else  
ThunderAgent.AddTaskInRect()  
End If

set ThunderAgent = nothing  
end sub

call OnContextMenu()

</script>

通过set ThunderAgent = CreateObject("ThunderAgent.Agent.1") ，我们知道这个脚本是调用activex控制来和迅雷主程序打交道的。ThunderAgent.Agent.1是ProgID，通过查注册表HKEY\_CLASSES\_ROOT/ThunderAgent.Agent.1可以知道其对应的CLSID为\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE\}。然后到HKEY\_CLASSES\_ROOT/CLSID/\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE\}/InprocServer32下面我们可以知道这个activex对应的dll为e:/Program Files/Thunder Network/Thunder/ComDlls/ThunderAgent5.9.23.1488.dll。然后我们通过vs提供的oleview.exe来查看这个dll的接口信息（typelib），其实就是解析dll的typelib资源段。

// Generated .IDL file (by the OLE/COM Object Viewer) // // typelib filename: ThunderAgent5.9.23.1488.dll \[ uuid(26D657AE-A466-4F44-AB1D-5CFFFADBED97), version(1.0), helpstring("ThunderAgent 1.0 Type Library"), custom(DE77BA64-517C-11D1-A2DA-0000F8773CE9, 100663657), custom(DE77BA63-517C-11D1-A2DA-0000F8773CE9, 1277990859), custom(DE77BA65-517C-11D1-A2DA-0000F8773CE9, "Created by MIDL version 6.00.0361 at Thu Jul 01 21:27:29 2010 ") \] library THUNDERAGENTLib \{ // TLib : // TLib : OLE Automation : \{00020430-0000-0000-C000-000000000046\} importlib("stdole2.tlb"); // Forward declare all types defined in this typelib interface IAgent; interface IAgent2; interface IAgent3; interface IAgent4; interface IAgent5; interface IAgent6; interface IXunLeiAgent; \[ uuid(485463B7-8FB2-4B3B-B29B-8B919B0EACCE), helpstring("Thunder Agent Class") \] coclass Agent \{ \[default\] interface IAgent; interface IAgent2; interface IAgent3; interface IAgent4; interface IAgent5; interface IAgent6; \}; \[ odl, uuid(1622F56A-0C55-464C-B472-377845DEF21D), helpstring("Thunder IAgent Interface"), dual, oleautomation \] interface IAgent : IDispatch \{ \[id(0x00000001), helpstring("method GetInfo")\] HRESULT GetInfo( \[in\] BSTR pInfoName, \[out, retval\] BSTR\* ppResult); \[id(0x00000002), helpstring("method AddTask")\] HRESULT AddTask( \[in\] BSTR pURL, \[in, optional, defaultvalue("")\] BSTR pFileName, \[in, optional, defaultvalue("")\] BSTR pPath, \[in, optional, defaultvalue("")\] BSTR pComments, \[in, optional, defaultvalue("")\] BSTR pReferURL, \[in, optional, defaultvalue(-1)\] int nStartMode, \[in, optional, defaultvalue(0)\] int nOnlyFromOrigin, \[in, optional, defaultvalue(-1)\] int nOriginThreadCount); \[id(0x00000003), helpstring("method CommitTasks")\] HRESULT CommitTasks(\[out, retval\] int\* pResult); \[id(0x00000004), helpstring("method CancelTasks")\] HRESULT CancelTasks(); \[id(0x00000005), helpstring("method GetTaskInfo")\] HRESULT GetTaskInfo( \[in\] BSTR pURL, \[in\] BSTR pInfoName, \[out, retval\] BSTR\* ppResult); \[id(0x00000006), helpstring("method GetInfoStruct")\] HRESULT GetInfoStruct(\[in\] int pInfo); \[id(0x00000007), helpstring("method GetTaskInfoStruct")\] HRESULT GetTaskInfoStruct(\[in\] int pTaskInfo); \}; \[ odl, uuid(1ADEFB0D-0FFA-4470-8AB0-B921080F0642), helpstring("Thunder IAgent2 Interface"), dual, oleautomation \] interface IAgent2 : IAgent \{ \[id(0x00000008), helpstring("method AddTask2")\] HRESULT AddTask2( \[in\] BSTR pURL, \[in, optional, defaultvalue("")\] BSTR pFileName, \[in, optional, defaultvalue("")\] BSTR pPath, \[in, optional, defaultvalue("")\] BSTR pComments, \[in, optional, defaultvalue("")\] BSTR pReferURL, \[in, optional, defaultvalue(-1)\] int nStartMode, \[in, optional, defaultvalue(0)\] int nOnlyFromOrigin, \[in, optional, defaultvalue(-1)\] int nOriginThreadCount, \[in, optional, defaultvalue("")\] BSTR pCookie); \[id(0x00000009), helpstring("method CommitTasks2")\] HRESULT CommitTasks2( \[in\] int nIsAsync, \[out, retval\] int\* pResult); \}; \[ odl, uuid(18243D84-9FE5-4977-9247-1AE41355C5C3), helpstring("Thunder IAgent3 Interface"), dual, oleautomation \] interface IAgent3 : IAgent2 \{ \[id(0x0000000a), helpstring("method AddTask3")\] HRESULT AddTask3( \[in\] BSTR pURL, \[in, optional, defaultvalue("")\] BSTR pFileName, \[in, optional, defaultvalue("")\] BSTR pPath, \[in, optional, defaultvalue("")\] BSTR pComments, \[in, optional, defaultvalue("")\] BSTR pReferURL, \[in, optional, defaultvalue(-1)\] int nStartMode, \[in, optional, defaultvalue(0)\] int nOnlyFromOrigin, \[in, optional, defaultvalue(-1)\] int nOriginThreadCount, \[in, optional, defaultvalue("")\] BSTR pCookie, \[in, optional, defaultvalue("")\] BSTR pCID); \}; \[ odl, uuid(D3830C5B-62EA-48EF-A7CB-5B3944CAE12F), helpstring("Thunder IAgent4 Interface"), dual, oleautomation \] interface IAgent4 : IAgent3 \{ \[id(0x0000000b), helpstring("method AddTask4")\] HRESULT AddTask4( \[in\] BSTR pURL, \[in, optional, defaultvalue("")\] BSTR pFileName, \[in, optional, defaultvalue("")\] BSTR pPath, \[in, optional, defaultvalue("")\] BSTR pComments, \[in, optional, defaultvalue("")\] BSTR pReferURL, \[in, optional, defaultvalue(-1)\] int nStartMode, \[in, optional, defaultvalue(0)\] int nOnlyFromOrigin, \[in, optional, defaultvalue(-1)\] int nOriginThreadCount, \[in, optional, defaultvalue("")\] BSTR pCookie, \[in, optional, defaultvalue("")\] BSTR pCID, \[in, optional, defaultvalue("")\] BSTR pStatURL); \}; \[ odl, uuid(80BB764D-348B-48EA-9F0F-D9458E0EE186), helpstring("Thunder IAgent5 Interface"), dual, oleautomation \] interface IAgent5 : IAgent4 \{ \[id(0x0000000c), helpstring("method AddTask5")\] HRESULT AddTask5( \[in\] BSTR pURL, \[in, optional, defaultvalue("")\] BSTR pFileName, \[in, optional, defaultvalue("")\] BSTR pPath, \[in, optional, defaultvalue("")\] BSTR pComments, \[in, optional, defaultvalue("")\] BSTR pReferURL, \[in, optional, defaultvalue(-1)\] int nStartMode, \[in, optional, defaultvalue(0)\] int nOnlyFromOrigin, \[in, optional, defaultvalue(-1)\] int nOriginThreadCount, \[in, optional, defaultvalue("")\] BSTR pCookie, \[in, optional, defaultvalue("")\] BSTR pCID, \[in, optional, defaultvalue("")\] BSTR pStatURL, \[in, optional, defaultvalue(-1)\] int nCallType, \[in, optional, defaultvalue("")\] BSTR pGCID, \[in, optional, defaultvalue(-1)\] int nFileSize); \[id(0x0000000d), helpstring("根据指定的迅雷类型启动迅雷")\] HRESULT CommitTasks3( \[in\] int nThunderType, \[in\] int nIsAsync, \[out, retval\] int\* pResult); \}; \[ odl, uuid(6BEC8438-4AEB-4EE9-9385-3C9F0F11F47D), helpstring("Thunder IAgent6 Interface"), dual, oleautomation \] interface IAgent6 : IAgent5 \{ \[id(0x0000000e), helpstring("method ConfirmRectMode")\] HRESULT ConfirmRectMode(\[out, retval\] int\* pResult); \[id(0x0000000f), helpstring("method AddTaskInRect")\] HRESULT AddTaskInRect(); \}; \[ uuid(E1A931EB-13B6-40B9-BEE9-3B98CC8A8DF8), helpstring("XunLeiAgent Class") \] coclass XunLeiAgent \{ \[default\] interface IXunLeiAgent; \}; \[ odl, uuid(3E9DE0FB-FFA0-4954-A514-1D7712559E35), helpstring("IXunLeiAgent 接口"), dual, nonextensible, oleautomation \] interface IXunLeiAgent : IDispatch \{ \}; \};

getAllurl.htm用到的方法有ConfirmRectMode，AddTask4，CommitTasks2和AddTaskInRect。ConfirmRectMode的作用就是弹出是否用可视化下载的对话框；AddTask4的作用是将链接加入列表（传入了cookie：external.menuArguments.document.cookie，这也是为什么迅雷可以下载需要登录的连接的原因）；CommitTasks2的作用是让迅雷开始下载；AddTaskInRect的作用是进入可视化下载界面。

如果用户选择的是非可视化下载，通过external.menuArguments.document.links和external.menuArguments.document.images 就可以拿到当前页面的所有链接和图片地址。external的接口可以看[http://msdn.microsoft.com/en-us/library/ms535246(v=VS.85).aspx][http_msdn.microsoft.com_en-us_library_ms535246_v_VS.85_.aspx]。

那接下来的关键就是AddTaskInRect方法的实现了。vckbase上有一篇文章《[**采集网页选定部分全攻略**][Link 1]**》，**介绍了如何获取选定部分文字和图片，我估计迅雷的实现跟这个差不多。

参考链接：

[http://www.cnblogs.com/waxdoll/archive/2005/12/23/303470.html][http_www.cnblogs.com_waxdoll_archive_2005_12_23_303470.html]

[http://blog.csdn.net/xushiweizh/archive/2007/04/26/1585137.aspx][http_blog.csdn.net_xushiweizh_archive_2007_04_26_1585137.aspx]

[http://topic.csdn.net/t/20060921/16/5038787.html][http_topic.csdn.net_t_20060921_16_5038787.html]

[http://zhidao.baidu.com/question/11153472][http_zhidao.baidu.com_question_11153472]

[http://www.vbaccelerator.com/progid.htm][http_www.vbaccelerator.com_progid.htm]

[http://forums.devx.com/archive/index.php/t-90027.html][http_forums.devx.com_archive_index.php_t-90027.html]

[http://www.codeproject.com/KB/aspnet/externalmenuArgument.aspx][http_www.codeproject.com_KB_aspnet_externalmenuArgument.aspx]

[0_1278247513U0KB.gif]: /images/20220709/1bdebcd907de4881821c9db694a473a6.png
[http_msdn.microsoft.com_en-us_library_ms535246_v_VS.85_.aspx]: http://msdn.microsoft.com/en-us/library/ms535246%28v=VS.85%29.aspx
[Link 1]: http://www.vckbase.com/document/viewdoc/?id=1093
[http_www.cnblogs.com_waxdoll_archive_2005_12_23_303470.html]: http://www.cnblogs.com/waxdoll/archive/2005/12/23/303470.html
[http_blog.csdn.net_xushiweizh_archive_2007_04_26_1585137.aspx]: http://blog.csdn.net/xushiweizh/archive/2007/04/26/1585137.aspx
[http_topic.csdn.net_t_20060921_16_5038787.html]: http://topic.csdn.net/t/20060921/16/5038787.html
[http_zhidao.baidu.com_question_11153472]: http://zhidao.baidu.com/question/11153472
[http_www.vbaccelerator.com_progid.htm]: http://www.vbaccelerator.com/progid.htm
[http_forums.devx.com_archive_index.php_t-90027.html]: http://forums.devx.com/archive/index.php/t-90027.html
[http_www.codeproject.com_KB_aspnet_externalmenuArgument.aspx]: http://www.codeproject.com/KB/aspnet/externalmenuArgument.aspx