Login med database

prøv at kigge her
http://www.opfinderen.dk/sites/15/

Der kommer en HTTP 500 - Intern serverfejl når jeg har sat de 2 replace sætninger ind... hvorfor?


<% @language=javascript %>
<%

navn = Replace(Request.Form("brugernavn"), "'", "''")
pass = Replace(Request.Form("password"), "'", "''")

conn = Server.CreateObject("ADODB.Connection");
DBPath = "DBQ=" + Server.mappath("db/database.mdb");
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; " + DBPath);

rs = conn.Execute("SELECT BRUGERNAVN, PASSWORD, NAVN FROM BRUGER WHERE BRUGERNAVN='"+navn+"' AND PASSWORD='"+pass+"'" );

if(!rs.EOF){
Response.Cookies("bruger")= rs.fields('BRUGERNAVN');
Response.Redirect("login_ok.asp");
  } else{
    Response.Redirect("login_fejl.asp");
    }



conn.Close();   
%>

Et hurtigt gæt, jeg har ikke undersøgt det:
Replace er en VBS funktion og findes ikke i javascript !!

Hvis det er sandt må du angive' at her er der VBS kode og senere
er det javascript kode eller osse må du finde den tilsvarende funktion
i javascript.

I øvrigt vil jeg anbefale dig at se på regulære udtryk, til at udelukke
uheldige tegn. Men det er osse en VBS ting.

Hej,

Prøv lige at erstattet med dette:

<% @language=javascript %>
<%

navn = Replace(Request.Form("brugernavn"), "'", "''")
pass = Replace(Request.Form("password"), "'", "''")

conn = Server.CreateObject("ADODB.Connection");
DBPath = "DBQ=" + Server.mappath("db/database.mdb");
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; " + DBPath);

rs = conn.Execute("SELECT BRUGERNAVN, PASSWORD, NAVN FROM BRUGER WHERE BRUGERNAVN='"&navn&"' AND PASSWORD='"&pass&"'" );

if(!rs.EOF){
Response.Cookies("bruger")= rs.fields('BRUGERNAVN');
Response.Redirect("login_ok.asp");
  } else{
    Response.Redirect("login_fejl.asp");
    }



conn.Close();   
%>

Den giver mig stadig en siden kan ikke vises HTTP fejl... :-/

Hvad med at bruge den her: Det lukker i hvert fald for muligheden som http://www.opfinderen.dk/sites/15/ beskriver ?

if Request.Form("brugernavn") <> "" AND Request.Form("password") <> "" then
Login

Jeg prøver lige en gang til:

<% @language=javascript %>
<%

navn = Replace(Request.Form("brugernavn"), "'", "''")
pass = Replace(Request.Form("password"), "'", "''")

funktionen replace findes IKKE i javascript afaik. Der skal skrives
at nu skiftes der til VBScript.

<% @language=vbscript %> eller hvordan syntaksen nu er.

Doh! Ser det først nu.

EZCali > Se lige FFSoft's rettelse!

Tak det virker :-)