网站导航网学 原创论文 原创专题 网站设计 最新系统 原创论文 论文降重 发表论文 论文发表 UI设计定制 论文答辩PPT格式排版 期刊发表 论文专题
返回网学首页
网学原创论文
最新论文 推荐专题 热门论文 论文专题
当前位置: 网学 > 交易代码 > Delphi精品代码 > 正文

外部程序调用讯雷下载文件的方法

论文降重修改服务、格式排版等 获取论文 论文降重及排版 论文发表 相关服务

 

  首先确保电脑已经安装讯雷,打开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;

  函数调用后,结构中将填充相应的信息。

  返回值:

  0 获取成功

  非0 获取失败

  任务操作

  3. 加入任务

  HRESULT AddTask

  (BSTR pURL,

  BSTR pFileName = "",

  BSTR pPath = "",

  BSTR pComments = "",

  BSTR pReferURL = "",

  INT nStartMode = -1,

  INT nOnlyFromOrigin = 0,

  INT nOriginThreadCount = -1);

  功能:

  往平台加入下载任务信息,此时尚未体现到迅雷中

  参数:

  参数名 含义

  pURL 目标URL,必须参数

  pFileName 另存名称,默认为空,表示由迅雷处理,可选参数

  pPath 存储目录,默认为空,表示由迅雷处理,可选参数

  pComments 下载注释,默认为空,可选参数

  pReferURL 引用页URL,默认为空,可选参数

  nStartMode 开始模式,0手工开始,1立即开始,默认为-1,表示由迅雷处理,可选参数

  nOnlyFromOrigin 是否只从原始URL下载,1只从原始URL下载,0多资源下载,默认为0,可选参数

  nOriginThreadCount 原始地址下载线程数,范围1-10,默认为-1,表示由迅雷处理,可选参数

  4. 开始任务

  HRESULT CommitTaskss()

  功能:

  把AddTask所加入的下载任务信息真正提交到迅雷中进行下载,并从平台中删除

  注意:如果AddTask添加的任务没有被提交没有被取消(调用CancelTasks),则Agent对象析构时会

  阻塞,所以调用者不应该残留一些没有被提交或者取消的任务,以避免脚本执行者停止响应。

  5. 取消任务

  HRESULT CancelTasks()

  功能:

  取消平台中所有由AddTask所加入的下载任务信息

  6. 查询任务信息

  BSTR GetTaskInfo(BSTR pURL,BSTR pInfoName);

  参数:

  参数名 含义

  pURL 所要查询的下载URL信息

  pInfoName 状态名称,有如下几种

  。“Exists”:pURL是否在迅雷的任务列表

  。“Path”:存储目录

  。“FileName”:文件名称

  。“FileSize”:文件大小

  。“CompletedSize”:已下载大小

  。“Percent”:下载进度

  。“Status”:任务状态

  返回值: 返回值是字符串与参数pInfoName有对应关系

  参数 返回值

  “Exists” ”true”存在,”false”不存在

  “Path”

  • 上一篇资讯: 代码风格约定Delphi
  • 下一篇资讯: Delphi学生公寓管理系统
  • 设为首页 | 加入收藏 | 网学首页 | 原创论文 | 计算机原创
    版权所有 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2020 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号 常年法律顾问:王律师