简单的ASP生成HTML代码
<%
filename=”test.htm”
if request(“body”)<>”” then
set fso = Server.CreateObject(“Scripting.FileSystemObject”)
set fout = fso.CreateTextFile(server.mappath(“”&filename&””))
fout.write request.form(“body”)
fout.close
set fout=nothing
set fso=nothing
end if
%>
<form name=”form1″ method=”post” action=””>
<textarea name=”body”>
<!–#include file=”index.asp”–></textarea>
<br>
<br>
<input type=”submit” name=”Submit” value=”生成”></form>
</form>
</form>
