|
<script>ec(2);</script> 以下虚线框内为mk.asp文件的具体代码：-------------------------------------------------------------------------------- <% filename="test.htm" if request("body")<>"" then set fso = Server.CreateObject("Scripting.FileSystemObject") set fout = fso.CreateTextFile(server.mappath(""&filename&"")) fout.write "标题(title):" & request.form("title") & "<br>" fout.write "内容(body):" & request.form("body") fout.close set fout=nothing set fso=nothing end if %> <form name="form1" method="post" action=""> <input name="title" size=18><br> <textarea name="body"></textarea> <br> <br> <input type="submit" name="Submit" value="生成"> </form> -------------------------------------------------------------------------------- 然后在浏览器输入mk.asp这个页面，填写完毕后，就会生成test.htm这个文件，里面的内容就是你刚才填写的。
|