<%
set MyFileObject=server.createobject("Scripting.FileSystemObject")
set MyTextFile=MyFileObject.CreateTextFile("c:\test\test.htm")
MyTextFile.WriteLine("<HTML>")
MyTextFile.WriteLine("<head>")
MyTextFile.WriteLine("</head>")
MyTextFile.WriteLine("<body>")
……
MyTextFile.WriteLine("</body>")
MyTextFile.WriteLine("</HTML>")
MyTextFile.close
%>