cookies跨不了域很麻煩,有了這個腳本就方便多了.
<%
ip=Request.ServerVariables("REMOTE_ADDR")
setFso=CreateObject("Scripting.FileSystemObject")
SetFiles=Fso.OpenTextFile(server.mappath("./ip.txt"),1,false)
data=files.readall
files.close
setfso=nothing
ifInstrRev(data,ip,-1,0)=0then
setFso=CreateObject("Scripting.FileSystemObject")
SetFile=Fso.OpenTextFile(server.mappath("./ip.txt"),8,true)
file.writelineip
file.close
setfso=nothing
response.write"此IP今天第一次訪問該頁面"
response.end
else
response.write"此IP以前訪問過了"
response.end
endif
%>