msSQL sammenling IP med Request.ServerVariables(REMOTE_ADDR)
Jeg har gloet mig blind på et lille og formentligt simpelt problem...Jeg kan ikke få udtrækket fra databasen til at se sammenligningen mellem rsR("hip") og Request.ServerVariables("REMOTE_ADDR") for at tildele admin rettighed på sittet (i den sidste elseif)...
Såfremt jeg definere ip adressen manuelt går det fint...
Kodesnip
connHomeipStr = "DRIVER={SQL Server}; SERVER="&Servernavn&"; DATABASE="&databasenavn&"; UID="&uidnavn&"; PWD="&pwdnavn&""
rsSQLReadip = "SELECT * FROM "&tabel_ip&" WHERE hip = '"&Request.ServerVariables("REMOTE_ADDR")&"'"
set conn = server.createobject("ADODB.connection")
conn.Open connHomeipStr
Set rsR = conn.execute(rsSQLReadip)
do while not rsR.eof
session("IP") = rsR("hip")
rsR.movenext
loop
set rsR = nothing
set conn = nothing
if request.Form("username") = huser1 and request.Form("password") = huser1 then
session("siteloggedin") = "ja"
Session.Contents.Remove("admin")
response.Redirect("?rum=toilet")
elseif request.Form("username") = huser2 and request.Form("password") = hpass2 and Request.ServerVariables("REMOTE_ADDR") <> session("IP") then
session("siteloggedin") = "ja"
Session.Contents.Remove("admin")
response.Redirect("?rum=toilet")
elseif request.Form("username") = huser2 and request.Form("password") = hpass2 and Request.ServerVariables("REMOTE_ADDR") = session("IP") then
session("admin") = "ja"
session("siteloggedin") = "ja"
response.Redirect("?rum=toilet")
else
response.Write("Der skete en fejl !!! Brugeren ikke fundet")
end if
snipslut
