分析BT种子文件的COM插件

【文件属性】：
文件名称：分析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)