用asp脚本实现限制IP访问

2018-09-06 10:35

阅读:597

  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
%>


评论


亲,登录后才可以留言!