文件名称：分析BT种子文件的COM插件
文件大小：870KB
文件格式：RAR
更新时间：2017-08-04 09:42:11
BT bencode COM 插件
vc2010 atl编写的asp com控件
可以比较全面的分析种子文件，可以用来转换bt种子为磁力链接
使用例子
<%
'创建服务器对象
Set tp = Server.CreateObject("Bdecode.MyTorrent")
'打开种子文件
tp.OpenTorrent(Server.MapPath("3.torrent"))
'获取Announce
response.Write(tp.GetAnnounce()&"
")
'获取Announce-List
AnnounceLists=split(tp.GetAnnounceList(),"|")
for i=0 to ubound(AnnounceLists)
response.write AnnounceLists(i)
response.write "
"
next
'获取种子来源名
response.Write(tp.GetName()&"
")
'获取种子内文件总大小，单位B
response.Write(tp.GetTsize()&"
")
'获取种子文件创建时间
response.Write(tp.GetDate()&"
")
'获取种子说明内容
response.Write(tp.GetComment()&"
")
'获取种子创建软件名
response.Write(tp.GetCreator()&"
")
'获取Publisher
response.Write(tp.GetPublisher()&"
")
'获取InfoHash
response.Write(tp.GetHash()&"
")
'获取种子内文件名列表
FileNames=split(tp.GetFileList(),"|")
'获取种子内文件路径列表
FilePaths=split(tp.GetPath(),"|")
'获取种子内文件大小列表，单位B
FileSizes=split(tp.GetLength(),"|")
for i=0 to ubound(FileNames)
response.write FileNames(i)
response.write "
"
response.write FileSizes(i)
response.write "
"
response.write FilePaths(i)
response.write "
"
next
'释放资源
Set tp = Nothing
%>
需要源码的可以另外联系我
【文件预览】：
ASP_BT_COM
----Bdecode.dll(53KB)
----1.torrent(2.72MB)
----DEMO.asp(1KB)