使用XMLDOM,adodb.stream创建HTML文件
XMLDOM的方法是在l-blog的作者卫慧杰那里找到的，一直没听说这种方法，顺便整理一下adodb.stream的生成方法。
1.使用XMLDOM
dimxmlString
xmlString="<html>"&chr(10)&"<head>"&chr(10)&"<title>test</title>"&chr(10)&"</head>"&chr(10)&"<body>"&chr(10)&"<p><imgsrc=""http://www.webjx.com/htmldata/2007-03-25/test.gif""/></p>"&chr(10)&"</body>"&chr(10)&"</html>"
dimxmlDoc
setxmlDoc=server.createObject("Msxml2.DOMDocument")
xmlDoc.loadXml(xmlString)
xmlDoc.save(server.mappath("test.htm"))
setxmlDoc=nothing
原文有一点点小错误，<imgsrc="http://www.webjx.com/htmldata/2007-03-25/test.gif"/>这段应该是<imgsrc=""http://www.webjx.com/htmldata/2007-03-25/test.gif""/>可能一时疏忽
2.使用XMLDOM,adodb.stream
dimhtmlString
htmlString="<html>"&chr(10)&"<head>"&chr(10)&"<title>test</title>"&chr(10)&"</head>"&chr(10)&"<body>"&chr(10)&"<p><imgsrc=""http://www.webjx.com/htmldata/2007-03-25/test.gif""/></p>"&chr(10)&"</body>"&chr(10)&"</html>"
setmaker=server.CreateObject("adodb.stream")
maker.Type=2'以本模式读取
maker.mode=3
maker.charset="utf-8"
maker.open
maker.WriteTexthtmlString
maker.SaveToFileserver.MapPath("test.htm"),2
maker.flush
maker.Close
setmaker=nothing