Set ThunderAgent = CreateObject("ThunderAgent.Agent") '建立迅雷接口对象
ThunderAgent.AddTask "http://10.10.10.10/电影世界/12新电影/随风而逝.rmvb", "随风而逝.rmvb", "", "", "", - 1 , 0, - 1
Call ThunderAgent.CommitTasks '开始任务
Set ThunderAgent = Nothing '释放对象
//AddTask方法的参数如下:AddTask("下载地址", "另存文件名", "保存目录","任务注释","引用地址","开始模式", "只从原始地址下载","从原始地址下载线程数")
//参数含义
//pURL目标URL,必须参数
//pFileName另存名称,默认为空,表示由迅雷处理,可选参数
//pPath存储目录,默认为空,表示由迅雷处理,可选参数
//pComments下载注释,默认为空,可选参数
//pReferURL引用页URL,默认为空,可选参数
//nStartMode开始模式,0手工开始,1立即开始,默认为-1,表示由迅雷处理,可选参数
//nOnlyFromOrigin是否只从原始URL下载,1只从原始URL下载,0多资源下载,默认为0,可选参数
ThunderAgent.AddTask "http://10.10.10.10/电影世界/12新电影/随风而逝.rmvb", "随风而逝.rmvb", "", "", "", - 1 , 0, - 1
Call ThunderAgent.CommitTasks '开始任务
Set ThunderAgent = Nothing '释放对象
//AddTask方法的参数如下:AddTask("下载地址", "另存文件名", "保存目录","任务注释","引用地址","开始模式", "只从原始地址下载","从原始地址下载线程数")
//参数含义
//pURL目标URL,必须参数
//pFileName另存名称,默认为空,表示由迅雷处理,可选参数
//pPath存储目录,默认为空,表示由迅雷处理,可选参数
//pComments下载注释,默认为空,可选参数
//pReferURL引用页URL,默认为空,可选参数
//nStartMode开始模式,0手工开始,1立即开始,默认为-1,表示由迅雷处理,可选参数
//nOnlyFromOrigin是否只从原始URL下载,1只从原始URL下载,0多资源下载,默认为0,可选参数
//nOriginThreadCount原始地址下载线程数,范围1-10,默认为-1,表示由迅雷处理,可选参数
想了解更多的内容请百度 "ThunderAgent.Agent" ,深层次研究个人觉得用处不是很大了,呵呵。