---
title: "Läsa psw och usr i db."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13621-läsa-psw-och-usr-i-db"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Zaad"
published: "2002-01-07T19:42:00.000Z"
updated: "2002-01-07T20:51:00.000Z"
replies: 14
views: 303
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/13621-läsa-psw-och-usr-i-db"
---

# Läsa psw och usr i db.

## #1 — Zaad, 2002-01-07T19:42Z

Hejsan, jag lyckades få tag på denna lilla kod snutten. Men jag måste ha lite till på den tror jag. Vad e det som fattas för att det ska fungera att använda den...

```
SQLStmt = "SELECT * FROM users WHERE Username = '" & Request.Form("user") & "' AND Password = '" & Request.Form("Pass") & "'"
Set RS = objDB.Execute(SQLStmt) 
If RS.EOF Then
Response.Redirect("error.asp") 
Else 
Response.Cokies("Login")("AnvId") = RS("Id")
Response.Redirect("../inloggad.html") 
End If
RS.Close()
set RS = Nothing
```

Ps: cokie med 2 o. Men dom ville inte att man skulle ha det här tydligen. =/

Permalänk: https://www.webforum.nu/p/13621

## #2 — LarsG, 2002-01-07T19:49Z

Det som saknas är kod för att öppna databasen. Exakt hur det ser ut beror på vilken databashanterare du använder.

 <http://cgi.webforum.nu/wf/Forum11/HTML/001285.html> 

visar på hur det ser ut med access t.ex.

Permalänk: https://www.webforum.nu/p/303173

## #3 — Zaad, 2002-01-07T19:55Z

Men... Jag tror fortfarande det fattas lite tecken som gör att servern behandlar det på rätt sätt...

Min fil ser ut så här. 
confirm.asp

```
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Provider = "Microsoft.Jet.OLEDB.4.0"
Connection.ConnectionString = "Data Source=" & Server.MapPath("../db/users.mdb")
Connection.Open

SQLStmt = "SELECT * FROM users WHERE Username = '" & Request.Form("user") & "' AND Password = '" & Request.Form("Pass") & "'"
Set RS = objDB.Execute(SQLStmt) 
If RS.EOF Then
Response.Redirect("error.asp") 
Else 
Response.Cokies("Login")("AnvId") = RS("Id")
Response.Redirect("../inloggad.html") 
End If
RS.Close()
set RS = Nothing
```

Permalänk: https://www.webforum.nu/p/303174

## #4 — LarsG, 2002-01-07T19:59Z

```
Set RS = connection.Execute(SQLStmt)
```

Permalänk: https://www.webforum.nu/p/303175

## #5 — Zaad, 2002-01-07T20:03Z

Men den vissar bara koden i min browser. Den verkar inte behandla det som asp. Eller så e det nått som fattas...

Permalänk: https://www.webforum.nu/p/303176

## #6 — @nders, 2002-01-07T20:07Z

Du skall omsluta asp-koden med \<% %\>.

Alltså:

```
[b]<%[/b]
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Provider = "Microsoft.Jet.OLEDB.4.0"
Connection.ConnectionString = "Data Source=" & Server.MapPath("../db/users.mdb")
Connection.Open
SQLStmt = "SELECT * FROM users WHERE Username = '" & Request.Form("user") & "' AND Password = '" & Request.Form("Pass") & "'"
Set RS = objDB.Execute(SQLStmt) 
If RS.EOF Then
Response.Redirect("error.asp") 
Else 
Response.Cokies("Login")("AnvId") = RS("Id")
Response.Redirect("../inloggad.html") 
End If
RS.Close()
set RS = Nothing
[b]%>[/b]
```

Mvh,

Permalänk: https://www.webforum.nu/p/303177

## #7 — Zaad, 2002-01-07T20:10Z

Körningsfel i Microsoft VBScript fel '800a01a8' 

Objekt krävs.: 'objDB' 

/duell/asp/confirm.asp, rad 7 

Rad 7 = Set RS = objDB.Execute(SQLStmt)

Permalänk: https://www.webforum.nu/p/303178

## #8 — icaaq, 2002-01-07T20:24Z

Du ska som LarsG sa tidigare byta ut

```
Set RS = objDB.Execute(SQLStmt)
```

Till

```
Set RS = connection.Execute(SQLStmt)
```

Permalänk: https://www.webforum.nu/p/303179

## #9 — @nders, 2002-01-07T20:27Z

Jag ber om ursäkt för att jag missade det i den koden jag postade.

Mvh,

Permalänk: https://www.webforum.nu/p/303180

## #10 — Zaad, 2002-01-07T20:28Z

Fel igen. Jag rättade till det sista. Kan inte någon typ bara ta min kod och rätta till den. =) Och posta den här. =)

Microsoft JET Database Engine fel '80040e10' 

Det har inte angetts något värde för en eller flera nödvändiga parametrar. 

/duell/asp/confirm.asp, rad 7

confirm.asp

```
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Provider = "Microsoft.Jet.OLEDB.4.0"
Connection.ConnectionString = "Data Source=" & Server.MapPath("../db/users.mdb")
Connection.Open
SQLStmt = "SELECT * FROM users WHERE Username = '" & Request.Form("user") & "' AND Password = '" & Request.Form("Pass") & "'"
Set RS = connection.Execute(SQLStmt)
If RS.EOF Then
Response.Redirect("error.asp") 
Else 
Response.Cokies("Login")("AnvId") = RS("Id")
Response.Redirect("../inloggad.html") 
End If
RS.Close()
set RS = Nothing
%>
```

Permalänk: https://www.webforum.nu/p/303181

## #11 — LarsG, 2002-01-07T20:32Z

Det felet du fick nu beror på att du i select-satsen har angett kolumnnamn som inte finns i din tabell.

Permalänk: https://www.webforum.nu/p/303182

## #12 — Zaad, 2002-01-07T20:38Z

Fel igen...
Jag säger bara en sak. Mycket klydd för lite nytta. Men nu tänker jag inte ge mej...

ADODB.Recordset fel '800a0cc1' 

Objektet kunde inte hittas i mängden med det begärda namnet eller numret. 

/duell/asp/confirm.asp, rad 11 

rad 11

```
Response.Cokies("Login")("AnvId") = RS("Id")
```

"cokies med 2 o"

Permalänk: https://www.webforum.nu/p/303183

## #13 — @nders, 2002-01-07T20:43Z

Heter fältet ID i tabellen? Felmeddelandet antyder att så icke är fallet.

Mvh,

Permalänk: https://www.webforum.nu/p/303184

## #14 — Zaad, 2002-01-07T20:49Z

Databasen har 3 fält..
ID, Username, Password

ADODB.Recordset fel '800a0cc1' 

Objektet kunde inte hittas i mängden med det begärda namnet eller numret. 

/duell/asp/confirm.asp, rad 11

Permalänk: https://www.webforum.nu/p/303185

## #15 — Zaad, 2002-01-07T20:51Z

Sorry, mitt fel. 
Stort D på ID. =)

Nu funkar det..
Tack allihopa för hjälpen....

Permalänk: https://www.webforum.nu/p/303186

---

Tråden på webben: https://www.webforum.nu/amne/asp/13621-läsa-psw-och-usr-i-db