利用xmlhttp对象获取远程的数据,然后用二进制输出到客户浏览器,让客户下载数据,此例从某一远程服务器获取一个压缩包,并且输出到浏览器提供客户下载。 程序代码:<% Response.Buffer = True Dim objXMLHTTP, xml Set xml = Server.CreateObject( Microsoft.XMLHTTP ) '创建对象 xml.Open GET , 远程下载地址 ,False ' xml.Send '发送请求 Response.AddHeader Content-Disposition , attachment;filename=文件名 '添加头给这个文件 Response.ContentType = application/zip '设置输出类型 Response.BinaryWrite xml.responseBody '输出二进制到浏览器 Set xml = Nothing%>
查看详细内容 >>