生成静态页面

原创 2007年10月09日 15:54:00
<%
filename
="../index.html"
if request("body")<>"" then
    body
=request("body")

    
Set fso = Server.CreateObject("Scripting.FileSystemObject")
    
Set fout = fso.CreateTextFile(server.mappath(""&filename&""))
    fout.Write body

    fout.close
    
set fout=nothing
    
set fso=nothing
end if
%
>

 

<textarea ><!--#include file="index_mb.asp"--></textarea>

 

收藏助手
不良信息举报
您举报文章:生成静态页面
举报原因:
原因补充:

(最多只允许输入30个字)