Der er for få parametre. Der var ventet 1.

ups.. havde tager forkert line...

sådan ser den ud
set rs4 = rs.execute(SQL4)

if request.form("login") <> "" then

set rs = Server.CreateObject("ADODB.Connection")
conn = "DRIVER={Microsoft Access Driver (*.mdb)}; "
conn = conn & "DBQ=" & server.mappath("db/g97r192v7r9vg1r23vg9123rvgy913r2g9123gr9ieas.mdb")
Bruger = Request.Form("FBruger")
Pass = Request.Form("FPass")
SQL4 = "SELECT * FROM user WHERE UserID = '" & Bruger & "'"
rs4.Open conn
set rs4 = rs.execute(SQL4)


sådan ser det hele ud..

<%
if request.form("login") <> "" then

set rs = Server.CreateObject("ADODB.Connection")
conn = "DRIVER={Microsoft Access Driver (*.mdb)}; "
conn = conn & "DBQ=" & server.mappath("db/g97r192v7r9vg1r23vg9123rvgy913r2g9123gr9ieas.mdb")
Bruger = Request.Form("FBruger")
Pass = Request.Form("FPass")
SQL4 = "SELECT * FROM user WHERE UserID = '" & Bruger & "'"
rs4.Open conn
set rs4 = rs.execute(SQL4)
       
'Undersøg om det er det rigtigt Password og send til loginsiden hvis det er forkert ellers sender den til Lektiesiden.

    If rs4.EOF Then
            Alert = "Forkert brugernavn"
        Elseif rs4("password") = pass Then
      Session("Login") = Bruger
      Session("ID") = rs("ID")
      response.Redirect("default.asp")
      Else         
      Alert = "Forkert Password"
    End If
    end if
%>

sådan ser det hele faktisk ud :D

plz.. hjælp mig..

SQL4 = "SELECT * FROM user WHERE UserID = " & Bruger & ""

Jeg gætter på at user er et reserveret ord, prøv derfor denne med klammer omkring.
SQL4 = "SELECT * FROM [user] WHERE UserID = '" & Bruger & "'"

narh.. altså du kan jo se i det jeg har skrevet før det er en table i min database

hmm.. den melder fejl linien , fordi der er fejl i linien set rs4 = rs.execute(SQL4):

SQL4 = "SELECT * FROM user WHERE UserID = '" & Bruger & "'"

Og grunden kan være at "Bruger" er tom.
Prøv det her.. efter linien Bruger = Request.Form("FBruger") indsætter du:
response.write "*" & Bruger & "*"
response.end

Hvis den bare udskriver "**", er det fordi "Bruger" ikke indeholder noget..

Hvis du kigger her http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/Q209/1/87.ASP&NoWebContent=1 kan du se de reserverede ord i Access og user er et af dem.

hmm.. det havde jeg ikke lagt mærke til.. Du kan vist i stedet bruge:

SQL4 = "SELECT * FROM [user] WHERE UserID = '" & Bruger & "'"

thesurfer>> Det har jeg prøvet at forklare ham kl 20:21:01 :-)

jeg vil prøve... tror også bare det var det med user.. vist ikke lige at der var reserverede ord i access.. men tak for det.

Jeg lægger et svar i tilfælde af at det var det med de reserverede ord :-)

bertie> hmm.. Nu læser jo kun spm'et, og ikke indlæggene (hæhæhæ) ;-)
Så ikke dit indlæg, men du har ret :-)

thesurfer>> Jeg kender det :-)

hmm det er ikke det med user

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][ODBC Microsoft Access-driver] Der er for få parametre. Der var ventet 1.
/2on2123/default.asp, line 21




<%
if request.form("login") <> "" then

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("db/g97r192v7r9vg1r23vg9123rvgy913r2g9123gr9ieas.mdb")
Conn.Open DSN 
Bruger = Request.Form("FBruger")
Pass = Request.Form("FPass")
sql123 = "SELECT * FROM Tuser WHERE UserID = '" & Bruger & "'"
'dette er line 21
set rs123 = conn.execute(sql123)
       
'Undersøg om det er det rigtigt Password og send til loginsiden hvis det er forkert ellers sender den til Lektiesiden.

    If rs123.EOF Then
            Alert = "Forkert brugernavn"
        Elseif rs123("password") = pass Then
      Session("Login") = Bruger
      Session("ID") = rs123("ID")
      response.Redirect("default.asp")
      Else         
      Alert = "Forkert Password"
    End If
    end if
%>

Prøv at udskrive indholdet af din sql streng istedet for at se om bruger skulle være tom, som thesurfer har foreslået længere oppe.
istedet for set rs123 = .... så lav
response.write sql123 og se hvad den siger.

Og er du sikker på at du har et felt der hedder UserID i din tabel Tuser ?

ja der er en som hedder UserID men nu laver den en ny fejl...

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.
/2on2123/default.asp, line 21

line 21 --->  set rs = conn.execute(sql)

Den kode du har givet ovenfor er der ikke noget der hedder set rs = conn.execute(sql) ?

Når du får disse fejl er det nemmere for dig at udskrive din sql på skærmen og så se hvad sætningen siger.

mht "Datatyperne stemmer ikke overens i kriterieudtrykket.".
Det sker f.eks. hvis feltet er af typen tal, og du kommer med noget tekst.. om omvendt.

Jeg gætter på at UserID er af typen tal.. der skal nemlig ikke ' tegn udenom:
sql123 = "SELECT * FROM Tuser WHERE UserID = " & Bruger

Men prøv det jeg skrev i indlægget 24/01-2004 21:18:01..

Prøv at gør dette og se om det virker :-D
----------------------------------------------
Dim Bruger, Pass
Bruger = Trim(Request.Form("FBruger"))
Pass = Trim(Request.Form("FPass"))

SQL123 = "SELECT * FROM Tuser WHERE UserID = '" & Bruger & "';"
set rs123 = conn.execute(SQL123)
----------------------------------------------
Håber det hjælper ;-)

ved ikke om det kom til at virker.. husker ikke rigtig noget..