|
热门文章 |
|
|
|
相关文章 |
|
没有相关文章 |
|
|
录入的内容,自动生成html文件 |
来源:百度空间 更新时间:2010/7/17 23:34:17 阅读次数:
字体:[大 中 小大 中 小大 中 小] 我要投稿 |
<% filename=year(now)&month(now)&day(now)&minute(now)&.htm ’根据当前时间生成文件名 if request(body)<> then set objfso = Server.CreateObject(Scripting.FileSystemObject) ’创建一个fso实例 set htmout = objfso.CreateTextFile(server.mappath(&filename&)) htmout.write <html><head><title> htmout.write request.form(title) htmout.write </title></head><body>七彩新闻: htmout.write request.form(title) htmout.write <br>内容(body): htmout.write request.form(body) htmout.write </body></html> htmout.close set htmout=nothing set objfso=nothing end if %> <form name=form1 method=post action=> <table width=300 border=0 align=center> <tr> <td align=right>标题:</td> <td colspan=2><input name=title size=18></td> </tr> <tr> <td align=right>内容:</td> <td colspan=2><textarea name=body></textarea></td> </tr> <tr> <td align=right> </td> <td><input type=submit name=Submit value=生成></td> <td><a href=<%=filename%> target=_blank>查看输出的文件</a></td> </tr> </table> <br> <br> <br> </form> |
上一篇文章: 删除网站里无用的图片下一篇文章: asp连接SQL数据库 |
|
|