Redirecting

Det er faktisk nemmere end det lyder.

Nu ved jeg ikke hvor meget erfaring du har men i praksis er det bare således:

if rs("ip") = "192.168.1.1" then
resposne.redirect "19216811.html"
elseif rs("ip") = "192.168.1.2" then
response.redirect "192.168.1.2.html"
else response.write "din ip er ikke i databasen"
end if

håber du blev klogere

_labisama_  >> Du skal jo også have et loop der kigger databasen igennem! Et eks. kunne se sådan ud:

If NOT Rs.EOF then

End if

FUCK fik lieg trykket! :) *G*
Laver lige et eks.... =)))

yes ved det...men forklarer også at det bare hovedtræk af opbygningen

har mine egne problemer at rode med :)

men jeg ville være taknemmelig vis i lavede et sådant script...

jeg vil godt give flere point!!!

Her er et lile eks jeg lige har lavet....
Men lidt flere point ville være passende.... =)
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("database.mdb")

STRSQL = "SELECT FROM tabelnavn"
set rs = Myconn.Execute(strSQL)

Findes = False
If NOT Rs.EOF then
    Do while NOt rs.EOF
        If Request.ServerVariables("REMOTE_ADDR") = rs("ip-felt") then
            Response.Redirect "sidefindes.asp"
            Findes = True
        End
    rs.MoveNext
    Loop
End if

If Not Findes then
    Response.Write "IP findes ikke i databasen!"
End if
%>

Ups mangler en stjerne i STRSQL! =) Håber du selv lige kan fikse d...

lige en lille kommentar...

Hvis det er mange ip´ere som den skal tjekke eller mange brugere på sammetid, så tror jeg du skal bruge MSsql- eller Mysqldatabase istedet.

_labisama_  >> Det komme jo an på hvad stefan's server understøter! =)

hvorfor bygger i det ikke ind i selve SQL sætningen det vil spare for en masse unødvendige tests.

strIp = Request.ServerVariabels("REMOTE-ADDDR")
SQL = "SELECT Ip-felt FROM tabelnavn WHERE Ip-felt = '"& strIp &"'"

Set Rs = Conn.Execute(SQL)

If Rs.EOF THEN
Response.write "Din ip fandtes ikke"
Else
Response.redirect "tildensidederskalsendestil.asp"
End If

Rs.Close
Set Rs = Nothing

/Søren Søndergård

--> Søren.

strIp = Request.ServerVariabels("REMOTE-ADDDR")
SQL = "SELECT URLFelt FROM tabelnavn WHERE Ip-felt = '"& strIp &"'"

Set Rs = Conn.Execute(SQL)

If Rs.EOF THEN
  Response.write "Din ip fandtes ikke"
Else
  Response.redirect RS("URLFelt")
End If

tak for hjælpen... jeg ved ikke hvilket eksempel jeg vil bruge som udgangs-punkt, men det vil tiden vise... men tak for jeres hjælp----

NP...