如何用ASP输出HTML文件


<
u_title =要求表单(u_title )检查是否输入的标题。
如果u_title = 然后
%>
>


文件标题

字体大小









第一段

第二段


<
最后如果
%>

<
如果u_title <>然后
u_title =要求表单(u_title )
u_paragraph1 =要求表单(u_paragraph1 )
u_paragraph2 =要求表单(u_paragraph2 )
u_text_color =要求表单(u_text_color )
u_text_size =要求表单(u_text_size )
g_filename =替代(u_title,和_ )如果有一个用户输入一个标题,获得所有用户输入的内容。

设置FSO = CreateObject(脚本。FileSystemObject )
集合行为= fso.createtextfile(server.mappath(write2htm / g_filename(日期(月))日(日期())年(日期()))
创建文本(HTML)文件到服务器并添加mmddyyyy格式的年份和月份。

编写所有的用户输入文本(HTML)文件,并且HTM扩展文件可以很容易地转换为您站点上最需要的asp或。
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()
close'closes文件的行为。
%>
您的页面已成功创建!请单击视图。

目标=_blank>视图



Response.write Chr(13)
response.write u_title
Response.write Chr(13)
response.write
Response.write Chr(13)
response.write
Response.write Chr(13)
response.write u_title
Response.write Chr(13)
response.write
Response.write Chr(13)
response.write u_paragraph1
Response.write Chr(13)
response.write
Response.write Chr(13)
response.write u_paragraph2
Response.write Chr(13)
response.write
response.write
response.write 是创建这个文件!
现在response.write()
最后如果
%>