Hvis, Ban ellers?
Hvordan får jeg den til bare at fortsætte hvis IP'en ikke er banned?<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../cgi-bin/users.mdb")
Conn.Open DSN
UserIP = Request.ServerVariables ("REMOTE_ADDR")
strSQLOwner = "Select * from tbl_Bans where IP = '" & UserIP & "'"
Set rsOwner = Conn.Execute(strSQLOwner)
if Not rsOwner.EOF OR rsOwner.BOF then
Response.redirect "banned.asp?reason=" & rsOwner("Reason") & ""
end if
%>
