Hej!

Jag håller förtilfället på med sidor som 1.Skriver in nya användare till en sql databas (Fungerar) 2.Raderar användare från databasen (Fungerar ej) 3. Modifierar användaren (Fungerar ej) 4. Loggar in användaren (Fungerar ej).

Denna kodning kommer från radera sidan.
Dim objRS, sql
Dim strAnvandare, Losen

strAnvandare = Trim(Request.Form("anvandarnamn"))
Losen = Trim(Request.Form("losenord"))

'Kontrollerar att ett användarnamn skrevs in
If strAnvandare = "" Then
objConn.Close
Set objConn = Nothing
Response.Write("")
Response.Write("Ni måste ange ett användarnamn.")
Response.Write("")
Response.End
End If

sql="SELECT AnvandarNamn, Losenord "& _
"FROM tblAnvandare " & _
"WHERE (AnvandarNamn = '"&strAnvandare&"') AND (Losenord = '"&Losen&"')"


Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open sql, objConn,1, 2

)

If (Not objRS.BOF And Not objRS.EOF) Then
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
Response.Write("")
Response.Write("Ogiltigt Användarnamn.")
Response.Write("")
Response.End
End If
Jag har kontrollerat BOF och EOF och båda har värdet falskt men det ända jag får är en länk som skriver Ogiltigt Användarnamn.

Om du har:
If (Not objRS.BOF And Not objRS.EOF) Then
och båda är false så blir koden lika med
If (Not False And Not False) Then
vilket ger True...

/Janne