利用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
  ----------------------------------------------
(出处:风闪网路学院)
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!