airuan12 发表于 2011-9-1 09:06 
LS:
5.x自然有它的秒处,首先下载的明白清楚,“资源IP分组显示”新版就没有、更没有悬浮窗;还有管理方 ...
5.8的绿色版,需要注册comdlls下三个dll文件
regsvr32 /s \ComDlls\TDAtOnce.dll
regsvr32 /s \ComDlls\ThunderAgent.dll
regsvr32 /s \ComDlls\XunLeiBHO.dll"
另如果是ie9的话还得使用修改过的geturl(在program目录下)
其内容如下
<script language="javascript">
function AddLink(Url,Info,Location,strCID,strStatUrl,strCookie)
{
if (Url != "")
{
if (Info == "")
{
Info = "unknown";
}
var ThunderAgent = new ActiveXObject("ThunderAgent.Agent");
if (strCID != "")
{
if (strStatUrl != "")
{
ThunderAgent.AddTask5(Url, "", "", Info, Location, -1, 0, -1, strCookie, strCID, strStatUrl, 1, "", -1);
}
else
{
ThunderAgent.AddTask5(Url, "", "", Info, Location, -1, 0, -1, strCookie, strCID, "", 1, "", -1);
}
}
else
{
ThunderAgent.AddTask5(Url, "", "", Info, Location,-1,0,-1,strCookie,"","", 1, "", -1);
}
ThunderAgent.CommitTasks2(1);
}
}
function OnContextMenu()
{
var srcEvent = external.menuArguments.event;
var EventElement;
if(typeof(srcEvent.clientX) == "undefined")
{
EventElement = external.menuArguments.document.elementFromPoint ( srcEvent.pointerX, srcEvent.pointerY );
}
else
{
EventElement = external.menuArguments.document.elementFromPoint ( srcEvent.clientX, srcEvent.clientY );
}
var strDownloadPage = external.menuArguments.location;
var theDownloadPage = external.menuArguments.document.getElementById("thunder_down_pageurl");
if (theDownloadPage != null)
{
strDownloadPage = theDownloadPage.value;
}
var strStatPage = "";
var theStatPage = external.menuArguments.document.getElementById("thunder_stat_pageurl");
if (theStatPage != null)
{
strStatPage = theStatPage.value;
}
var strCID = ""
var theCID = external.menuArguments.document.getElementById("thunder_cid");
if (theCID != null)
{
strCID = theCID.value;
}
var srcAnchor;
if (srcEvent.type == "MenuExtAnchor")
{
srcAnchor = EventElement;
do
{
srcAnchor=srcAnchor.parentElement;
}while(typeof(srcAnchor)=="HTMLAnchorElement");
AddLink(srcAnchor.href,srcAnchor.innerText,strDownloadPage, strCID, strStatPage,external.menuArguments.document.cookie);
}
else if (srcEvent.type == "MenuExtImage")
{
if (typeof(EventElement) == "HTMLAreaElement")
{
AddLink(EventElement.href,EventElement.Alt,strDownloadPage, strCID, strStatPage,external.menuArguments.document.cookie);
}
else
{
var srcImage = EventElement;
var srcAnchor = srcImage.parentElement;
do
{
srcAnchor=srcAnchor.parentElement;
if (typeof(srcAnchor) == "undefined")
{
AddLink(srcImage.href,srcImage.Alt,strDownloadPage, strCID, strStatPage,external.menuArguments.document.cookie);
return;
}
}while(typeof(srcAnchor) == "HTMLAnchorElement");
AddLink(srcAnchor.href,srcImage.Alt,strDownloadPage, strCID, strStatPage);
}
}
else if (srcEvent.type == "MenuExtUnknown")
{
srcAnchor = EventElement;
if(srcAnchor != null && srcAnchor.tagName != null && srcAnchor.tagName.toLowerCase() == "a")
{
//Add by Ayu
var strUrl = srcAnchor.href;
if (srcAnchor.href.toLowerCase() == "javascript:;")
{
var strFunction = srcAnchor.onclick.toString();
var nBegin = strFunction.indexOf("AddLink(\'");
if (nBegin == -1)
{
return;
}
var nEnd = strFunction.indexOf("\',");
if (nEnd == -1)
{
return;
}
strUrl = strFunction.substring(nBegin+9, nEnd);
}
AddLink(strUrl,srcAnchor.innerText,strDownloadPage, strCID, strStatPage,external.menuArguments.document.cookie);
}
else
{
while(srcAnchor != null && srcAnchor.tagName != null && srcAnchor.tagName.toLowerCase() != "a")
{
srcAnchor = srcAnchor.parentElement;
if(srcAnchor != null && srcAnchor.tagName != null && srcAnchor.tagName.toLowerCase() == "a")
{
AddLink(srcAnchor.href,srcAnchor.innerText,strDownloadPage, strCID, strStatPage,external.menuArguments.document.cookie);
return;
}
}
if(EventElement != null && EventElement.tagName != null)
{
AddLink(EventElement.href,EventElement.innerText,strDownloadPage, strCID, strStatPage,external.menuArguments.document.cookie);
}
else
{
alert("无法识别的超级链接信息");
}
}
}
else
{
}
}
OnContextMenu();
</script>
外加导入注册表
注册表项如下,对应修改程序目录
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}]
@="Thunder Agent Class"
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\Control]
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\InprocServer32]
@="T:\\ProgramFiles\\Thunder\\ComDlls\\ThunderAgent_Now.dll"
"ThreadingModel"="Apartment"
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\ProgID]
@="ThunderAgent.Agent.1"
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\Programmable]
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\TypeLib]
@="{26D657AE-A466-4F44-AB1D-5CFFFADBED97}"
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\Version]
@="1.0"
[HKEY_CLASSES_ROOT\CLSID\{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}\VersionIndependentProgID]
@="ThunderAgent.Agent"
[HKEY_CLASSES_ROOT\Interface\{1622F56A-0C55-464C-B472-377845DEF21D}]
@="IAgent"
[HKEY_CLASSES_ROOT\Interface\{1622F56A-0C55-464C-B472-377845DEF21D}\ProxyStubClsid]
@="{00020424-0000-0000-C000-000000000046}"
[HKEY_CLASSES_ROOT\Interface\{1622F56A-0C55-464C-B472-377845DEF21D}\ProxyStubClsid32]
@="{00020424-0000-0000-C000-000000000046}"
[HKEY_CLASSES_ROOT\Interface\{1622F56A-0C55-464C-B472-377845DEF21D}\TypeLib]
@="{26D657AE-A466-4F44-AB1D-5CFFFADBED97}"
"Version"="1.0"
[HKEY_CLASSES_ROOT\ThunderAgent.Agent]
@="Thunder Agent Class"
[HKEY_CLASSES_ROOT\ThunderAgent.Agent\CLSID]
@="{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}"
[HKEY_CLASSES_ROOT\ThunderAgent.Agent\CurVer]
@="ThunderAgent.Agent.1"
[HKEY_CLASSES_ROOT\ThunderAgent.Agent.1]
@="Thunder Agent Class"
[HKEY_CLASSES_ROOT\ThunderAgent.Agent.1\CLSID]
@="{485463B7-8FB2-4B3B-B29B-8B919B0EACCE}"
[HKEY_CLASSES_ROOT\TypeLib\{26D657AE-A466-4F44-AB1D-5CFFFADBED97}]
[HKEY_CLASSES_ROOT\TypeLib\{26D657AE-A466-4F44-AB1D-5CFFFADBED97}\1.0]
@="ThunderAgent 1.0 Type Library"
[HKEY_CLASSES_ROOT\TypeLib\{26D657AE-A466-4F44-AB1D-5CFFFADBED97}\1.0\0]
[HKEY_CLASSES_ROOT\TypeLib\{26D657AE-A466-4F44-AB1D-5CFFFADBED97}\1.0\0\win32]
@="T:\\ProgramFiles\\Thunder\\ComDlls\\ThunderAgent_Now.dll"
[HKEY_CLASSES_ROOT\TypeLib\{26D657AE-A466-4F44-AB1D-5CFFFADBED97}\1.0\FLAGS]
@="0"
[HKEY_CLASSES_ROOT\TypeLib\{26D657AE-A466-4F44-AB1D-5CFFFADBED97}\1.0\HELPDIR]
@="T:\\ProgramFiles\\Thunder\\ComDlls\\"
[HKEY_LOCAL_MACHINE\SOFTWARE\Thunder Network]
[HKEY_LOCAL_MACHINE\SOFTWARE\Thunder Network\ThunderOem]
[HKEY_LOCAL_MACHINE\SOFTWARE\Thunder Network\ThunderOem\thunder_backwnd]
"Path"="T:\\ProgramFiles\\Thunder\\Thunder.exe"
"Version"="5.8.9.662"
[HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\MenuExt\使用迅雷下载]
@="T:\\ProgramFiles\\Thunder\\Program\\GetUrl.htm"
"Contexts"=dword:00000022
|