Create an HTML file using Xmldom,adodb.stream

ado|dom|stream|xml| to create Xmldom method is found in L-blog author Wei Huijie There, has not heard of this method, by the way to tidy up the ADODB.stream generation method.

1. Use of XMLDOM
Dim xmlstring
Xmlstring= "Dim xmldoc
Set xmldoc = Server.CreateObject ("Msxml2.domdocument")
Xmldoc.loadxml (xmlstring)
Xmldoc.save (Server.MapPath ("test.htm"))
Set xmldoc=nothing
The original is a little bit of a mistake, This paragraph should be may be negligent

2. Use of Xmldom,adodb.stream
Dim htmlstring
Htmlstring= "
Set Maker=server. CreateObject ("ADODB.stream")
Maker. type=2 ' read in this mode
Maker.mode=3
maker.charset= "Utf-8"
Maker.open

Maker. WRITETEXT htmlstring
Maker. SaveToFile server. MapPath ("test.htm"), 2
Maker.flush
Maker. Close
Set maker=nothing