首先确保电脑已经安装讯雷,打开VS.NET 点击菜单:项目->添加引用->COM->添加对ThunderAgent 1.0 Type Library的引用
1.创建讯雷调用对象
Private ThunderEng As New THUNDERAGENTLib.Agent'创建讯雷调用对象
ThunderEng.AddTask("下载地址", "另存文件名", "保存目录","任务注释","引用地址","开始模式", "只从原始地址下载","从原始地址下载线程数") '添加下载任务
ThunderEng.CommitTasks()'提交下载任务
2.使用讯雷调用对象查询下载任务信息
sFileSize = ThunderEng.GetTaskInfo(txtURL.Text, "FileSize")'获取下载文件大小
sDownedSize = ThunderEng.GetTaskInfo(txtURL.Text, "CompletedSize")'获取已完成大小
sFileName = ThunderEng.GetTaskInfo(txtURL.Text, "FileName")'获取文件名
二、迅雷平台接口函数定义 获得信息 1. BSTR GetInfo(BSTR pInfoName)
功能：获得迅雷或平台相关信息
参数：
| 参数名 |
含义 |
| pInfoName |
信息名称，有如下4种
。“ThunderExists”：迅雷是否存在
。“ThunderRunning”：迅雷是否运行
。“ThunderVersion”：迅雷版本号
。“PlatformVersion”：平台版本号 |
返回值：返回值是字符串与参数pInfoName有对应关系
| 参数 |
返回值 |
| “ThunderExists” |
“true”存在，“false”不存在 |
| “ThunderRunning” |
“true” 运行中， “false”未运行 |
| “ThunderVersion” |
迅雷版本号 “x.x.x.x” |
| “PlatformVersion” |
平台版本号 “x.x.x.x” |
2. HRESULT GetInfoStruct(INT pInfo)
功能：获取迅雷或平台相关全部信息
参数：
| 参数名 |
含义 |
| pInfo |
其实是THUNDER_INFO类型的结构指针，调用前把它转换为INT类型；调用后结构中将填充平台信息，定义如下：
typedef struct _THUNDER_INFO
{
BOOL bThunderExists;
BOOL bThunderRunning;
CHAR szThunderVersion[32];
CHAR szPlatformVersion[32];
} THUNDER_INFO;
函数调用后，结构中将填充相应的信息。 |
返回值：