将asp页面转换成html页面

原创 2006年06月09日 15:01:00

Sub GenFile(id)

  dim objXmlHttp
  set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
  objXmlHttp.open "GET","http://www.xxx.com/product.asp?id=" & id ,false
  objXmlHttp.send()

  Dim binFileData
  binFileData = objXmlHttp.responseBody

  Dim objAdoStream
  set objAdoStream = Server.CreateObject("ADODB.Stream")
  objAdoStream.Type = 1
  objAdoStream.Open()
  objAdoStream.Write(binFileData)
  objAdoStream.SaveToFile Server.MapPath("/product") & "/" & id &  ".htm",2
  objAdoStream.Close() 
 end sub

版权声明:本文为博主原创文章,未经博主允许不得转载。 举报

相关文章推荐

Java 将HTML页面转换成DOM

Java 将HTML页面转换成DOM 附加包: nekohtml.jar http://pan.baidu.com/s/1sk1PhNZnekohtml的依赖包 http://pan.baidu.c...

java将文档转换成html页面代码 (doc中的图片生成资源文件)

import java.io.File; import com.jacob.com.*; import com.jacob.activeX.*; /** * @author mini_fly ...

我是如何成为一名python大咖的?

人生苦短,都说必须python,那么我分享下我是如何从小白成为Python资深开发者的吧。2014年我大学刚毕业..

教你如何把切割好的html页面转换成可供DIY的页面(高级教程)

今天给大家讲讲 如何把已经切割好的html页面或者模仿的页面转换成可供DIY的页面 请跟随教程一步一步操作  如有疑问请提出  以下以家居频道为例为大家讲解 我们常见...
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)