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

%>