输液后水肿几天能好:如何做一个IP登录验证asp代码

userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")

通过这个获取访问者IP，再与数据库中的IP对比

如果你会数据库的操作，后面的就不用我说了！

给你一段代码吧。改一下就行了~这是我一个站里的~这段代码是从数据里读限制人数，然后执行的！
<%
'sql的数据库
Set conn = Server.CreateObject("ADODB.Connection")
connstr = "driver={SQL Server};server=(local);UID=sa;PWD=sa;database=date"
conn.Open connstr
on error resume next
conn.Execute "CREATE TABLE userpc (ip char(30))"

set rs=server.CreateObject("adodb.recordset")
sql="select * from userpc"
rs.open sql,conn,3,3
do until rs.eof
i=i+1
rs.movenext
loop
rs.close
set rs=nothing
if i>userlt then
set rs=server.CreateObject("adodb.recordset")
sql="select * from userpc where ip like '"&request.ServerVariables("REMOTE_ADDR")&"'"
rs.open sql,conn,3,3
if rs.eof then
response.write "对不起，PC数量过多！"
response.End()
end if
set rs=nothing

else
regcode=trim(regcode)

set rs=server.CreateObject("adodb.recordset")
sql="select * from userpc where ip like '"&request.ServerVariables("REMOTE_ADDR")&"'"
rs.open sql,conn,3,3
if rs.eof then
rs.addnew
rs("ip")=request.ServerVariables("REMOTE_ADDR")
rs.update
end if
set rs=nothing
end if
%>

在IIS上设置访问权限以及限制IP即可~~~