Avatar billede tblaster Nybegynder
26. juni 2002 - 18:27 Der er 2 kommentarer og
1 løsning

Either BOF or EOF is True

Hvad er der lige galt når jeg får denne fejl:

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

Den skriver at det er i denne linje:
      str = "Brugernavnet eller Adgangskoden er forkert!"


Her er min kode:

<%

  Dim sSeed
  Dim sValidBrugernavn
  Dim sValidPassword
  Dim sValidHash
  Dim sBrugernavn
  Dim sPassword
  Dim sHash
  Dim sGruppenavn
  Dim sInitial
  Dim sFornavn
  Dim sEfternavn
  Dim str

Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "DBQ=" & Server.Mappath("Login.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

SQL = "SELECT Gruppenavn FROM Bruger WHERE Brugernavn='" & request("brugernavn") & "'"
rs.Open SQL, Conn

        Session("auth_GruppenavnId") = rs("Gruppenavn")

rs.Close
 
SQL = "SELECT Grupper.Gruppenavn, Bruger.Brugernavn, Bruger.Email, Bruger.Brugerkode, Bruger.Initial, Bruger.Fornavn, Bruger.Efternavn FROM Bruger INNER JOIN Grupper ON Bruger.Gruppenavn = Grupper.GruppeId WHERE Brugernavn='" & request("brugernavn") & "'"
rs.Open SQL, Conn

if rs.EOF = true then
  str = "Brugernavnet eller Adgangskoden er forkert!"
else
  sValidBrugernavn = rs("Brugernavn")
  sValidPassword = rs("Brugerkode")
  sGruppenavn = rs("Gruppenavn")
  sInitial = rs("Initial")
  sFornavn = rs("Fornavn")
  sEfternavn = rs("Efternavn")
  sEmail = rs("Email")

  sSeed = Session("auth_seed")
  sValidHash = MD5(sSeed & sValidPassword)
 
  sBrugernavn = Request.Form("brugernavn")
  sPassword = Request.Form("password")
  sHash = Request.Form("hash")
 
  If sSeed = "" Then
      str = "Din session er lukket. Du har enten venter for langtid eller også understøtter din browser ikke cookies."
  ElseIf sBrugernavn = "" Then
      str = "Brugernavnet eller Adgangskoden er forkert!"
  ElseIf LCase(sBrugernavn) <> LCase(sValidBrugernavn) Then
      str = "Brugernavnet eller Adgangskoden er forkert!"
  ElseIf sHash = "" And sPassword <> "" Then
      If sPassword <> sValidPassword Then
        str = "Brugernavnet eller Adgangskoden er forkert!"
      Else
        Session("auth_granted") = "true"
        Session("auth_Brugernavn") = sBrugernavn
        Session("auth_Gruppenavn") = sGruppenavn
        Session("auth_Initial") = sInitial
        Session("auth_Fornavn") = sFornavn
        Session("auth_Efternavn") = sEfternavn
        Session("auth_Email") = sEmail
   
    Response.Write "<script>top.document.location.href=""../intern/index.asp""</script>"

      end if
  ElseIf sHash <> "" Then
      If sHash <> sValidHash Then
        str = "Adgangskoden er ikke rigtig."
      Else
        Session("auth_granted") = "true"
        Session("auth_Brugernavn") = sBrugernavn
        Session("auth_Gruppenavn") = sGruppenavn
        Session("auth_Initial") = sInitial
        Session("auth_Fornavn") = sFornavn
        Session("auth_Efternavn") = sEfternavn
        Session("auth_Email") = sEmail

    Response.Write "<script>top.document.location.href=""../intern/index.asp""</script>"

      end if
  else
      str = "Der er sket en fejl. Prøv venligst igen. Hvis dette fortsætter så kontakt venligst webmaster@havneparken1vejle.dk"
  End If
End if

%>
Avatar billede medions Nybegynder
26. juni 2002 - 18:28 #1
Sæt dette øverst i dit dokument:

<% Response.Buffer = True %>

//>Rune
Avatar billede medions Nybegynder
26. juni 2002 - 18:29 #2
ahh.. nej undskyld... det er fordi den record du efterspørgere ikke findes... Prøv at kigge efter i databasen!

//>Rune
Avatar billede eagleeye Praktikant
26. juni 2002 - 18:30 #3
du skal putte en if omkring sådan her:

rs.Open SQL, Conn
if NOT rs.EOF then
  Session("auth_GruppenavnId") = rs("Gruppenavn")
end if
rs.Close
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester