Jeg har et login script prom.??

her er login scriptet

<%
SET rs = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../database/db.mdb")

If Request("mode") = "Check" then

Sql = "Select Count(*) as Found from bruger where (brugernavn = '" & Trim(Replace(Request("brugernavn"),"'","''")) & "') and (password ='" & Trim(Replace(Request("password"),"'","''")) & "')"
Set Login = Rs.Execute(Sql)
if Login("Found") = 0 then
Session("login") = 0
error = "Du har skrevet en forkert Brugernavn eller Password prøv igen eller kontakt Webmarsteren."
else
Session("Login") = 1
Session("password-session") = Request("brugernavn")
Response.Redirect "bruger.asp"
end if
else
end if
%>

kan i ikke hjælpe mig med det her

Hent bruger_id ud vha. en sql-query, og lav en if sætning med en redirect i, så hvis bruger_id=1 så til den side ellers til en anden side ...

kan du vis det i kode

Det vil være noget aller det her, du må dog ikke hænge mig op på det hvis det ikke lige virker, jeg har ikke noget sted at teste det, og det er et stykke tid siden jeg sidst lavede noget i ASP :)

SQL2 = "SELECT bruger_id FROM bruger WHERE (brugernavn = '(indskrevet)brugernavn')"

set bruger_id_hent=rs.execute(sql2)

If bruger_ny_hent="1" then
Response.Redirect "admin.asp"
else
Response.Redirect "bruger.asp"
end if

Dette burde du kunne skrive ind i stedet for 'Response.Redirect "bruger.asp"', men som jeg sagde det er et stykke tid siden, Dog ville jeg sige at du bure definere dine variabler i toppen, det vil gøre din kodning noget nemmere, når tingene bliver større.

lukket