代码: <% FilePath = Server.MapPath("/")&"\amt.asp" MbBody = "<h1>amt,偶喜欢你!</h1>" set myfile=server.CreateObject("scripting.filesystemobject") set thisfile=myfile.CreateTextFile(FilePath,True) thisfile.write(MbBody) thisfile.close set thisfile=nothing set myfile=nothing %>