ASP文件中有以下代码:
<%
function xxx()
dim fso,f
set fso=server.CreateObject("scripting.filesystemobject")
set f=fso.opentextfile("c:\inetpub\wwwroot\aaa.txt",8,1)
f.writeline (document.Form.t1.value+"|"+document.Form.t2.value)
f.close
set f=nothing
set fso=nothing
end function
%>
朋友,说话没必要那么冲吧!
<%
if request.form("t1")<>"" and request.form("t2")<>"" then
dim fso,f
set fso=createobject("scripting.filesystemobject")
set f=fso.opentextfile("F:\www\aaa.txt",8,true)
f.writeline request.form("t1")&"|"&request.form("t2")
f.close
set f=nothing
set fso=nothing
end if
%>