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

  程序代码:
  <%
  Response.Buffer = True
  Dim objXMLHTTP, xml
  Set xml = Server.CreateObject("Microsoft.XMLHTTP") '创建对象
   
  xml.Open "GET","www.cnsxml.com
  QQ:2596812 MSN:xzskyweb@hotmail.com
  ----------------------------------------------