XMLHTTP下载远程数据输出到浏览器

随心笔谈2年前发布编辑

128 0

🌐 经济型：买域名、轻量云服务器、用途：游戏网站等《腾讯云》特点：特价机便宜适合初学者用点我优惠购买

🚀 拓展型：买域名、轻量云服务器、用途：游戏网站等《阿里云》特点：中档服务器便宜域名备案事多点我优惠购买

🛡️ 稳定型：买域名、轻量云服务器、用途：游戏网站等《西部数码》特点：比上两家略贵但是稳定性超好事也少点我优惠购买

利用xmlhttp对象获取远程的数据，然后用二进制输出到客户浏览器，让客户下载数据,此例从某一远程服务器获取一个压缩包，并且输出到浏览器提供客户下载.
程序代码:

Response.Buffer=True

Dim objXMLHTTP, xml

Set xml=Server.CreateObject(“Microsoft.XMLHTTP”) ‘创建对象

xml.Open “GET”,”http://www.4guysfromrolla.com/webtech/code/mitchell-pres.zip”,False ‘ ‘设置对象,具体xmlhttp详细使用方法请见:http://www.cnsxml.com/blogview.asp?logID=273 《XMLHTTP 对象及其方法》一文
xml.Send ‘发送请求

Response.AddHeader “Content-Disposition”, “attachment;filename=mitchell-pres.zip” ‘添加头给这个文件

Response.ContentType=”application/zip” ‘设置输出类型

Response.BinaryWrite xml.responseBody ‘输出二进制到浏览器
Set xml=Nothing

———————————————-

欧阳东杰创作（转载请保留此信息）

www.cnsxml.com

QQ:2596812 MSN:xzskyweb@hotmail.com

———————————————-

（出处：风闪网路学院）