Hvis vi nu siger du har en tabel som hedder IPlist og den indeholder en kolonne som hedder IP af typen tekst, kan du lave det tjek du har vist på denne måde. Du skal lige rette database fil sti + navnet sådan
<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db.mdb")
SQL = "SELECT * FROM IPlist WHERE IP = '" & Request.ServerVariables("Remote_Addr") & "'" Set rs = Conn.Execute(SQL) if not rs.EOF then 'Banned IP fundet Response.Redirect "block/" end if %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.