Hej! If Not (Rst.Eof or Rst.BOF) Then Min inloggnig funkar ej!
Har ett litet problem med min inloggning. Här kommer koden. Sidan heter loggaIn.asp
<%
response.buffer = true
%>
<html>
<head>
<title>Logga in</title>
</head>
<body>
<form name="check" action="loggaIn.asp?mode=validate">
<input type="text" name="txtSmeknamn"><br>
<input type="password" name="txtLosen"><br>
<input type="submit" value="Logga in">
</form>
<%
If request.form("mode") = "validate" Then
Set rs = Server.CreateObject("ADODB.Recordset")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\aspOvningar\databas.mdb"
smeknamn = Request.form("txtSmeknamn")
losen = Request.form("txtLosen")
SQL = "SELECT idSmeknamn, fltLosen FROM tblAnvandare "
SQL = SQL & "WHERE idSmeknamn = '" & smeknamn & "' And fltLosen = '" & losen & "'"
Set rs = conn.Execute(SQL)
If Not (Rst.Eof or Rst.BOF) Then
session("inne") = True
session("smeknamn") = rs("fltSmeknamn")
Else
Response.Redirect "loggaIn.asp?mode=fel"
End If
Response.Redirect "index.asp"
End If
If request.form("mode") = "fel" Then
response.write "fel"
%>
</body>
</html>
mvh/MagnusSv: Min inloggnig funkar ej!
session("inne") = True
session("smeknamn") = rs("fltSmeknamn")
Else
ska det inte vara
If Not (Rs.Eof or Rs.BOF) Then
session("inne") = True
session("smeknamn") = rs("fltSmeknamn")
Else
RS inte RST !!!!