asp怎么转换html格式,如何用ASP输出HTML文件？

'如果有一个用户输入了标题,则获取所有的用户输入的内容.

set fso = createobject("scripting.filesystemobject")

Set act = fso.CreateTextFile(server.mappath("write2htm/"&g_filename & "-"& month(date())& day(date())& year(date()) &".htm"), true)

'创建create the text (html) file文件到服务器,并添加mmddyyyy格式年月日.

'写所有用户输入的text (html)文件, .htm扩展名文件可以很容易地转换成你网站最需要的.asp或.inc文件.

act.WriteLine ""

act.WriteLine chr(13)

act.WriteLine "

"& u_title &""

act.WriteLine chr(13)

act.WriteLine "

"

act.WriteLine chr(13)

act.WriteLine "

"

act.WriteLine chr(13)

act.WriteLine  u_title &"

"

act.WriteLine chr(13)

act.WriteLine "

"

act.WriteLine chr(13)

act.WriteLine  u_paragraph1 &"

"

act.WriteLine chr(13)

act.WriteLine "

"

act.WriteLine chr(13)

act.WriteLine u_paragraph2 &"

"

act.WriteLine chr(13)

act.WriteLine "

act.WriteLine "

"

act.WriteLine "此文件被创建!"

act.WriteLine  now() &"

"

act.Close