---
title: "cookies problem"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/173852-cookies-problem"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Biasse"
published: "2008-09-04T18:00:03.000Z"
updated: "2008-09-06T09:58:17.000Z"
replies: 14
views: 691
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/173852-cookies-problem"
---

# cookies problem

## #1 — Biasse, 2008-09-04T18:00Z

Hejsan.  Sitter och sliter med en inloggning jag haft länge.
Skulle vilja lägga till en kaka men får det inte att läsa igenom det rätt.

Jag får felkod:

```
Feltyp:
ADODB.Recordset (0x800A0CC1)
Objektet kunde inte hittas i mängden med det begärda namnet eller numret.
/forum_mitt/kontroll.asp, line 19
```

Den jag villlägga till är denna:

```
Response.Cookies("anvnamn") = RecSet("anvnamn")
```

  :h  Tacksam för lite hjälp på vägen med detta.

kontroll.asp ser ut så här just nu och det är

```
<%
Function secure(txt) 
  txt = Replace(txt, "'", "''") 
  secure = txt 
End Function

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\inetpub\wwwroot\forum_mitt\lagret\nisse.mdb"
Set RecSet = Server.CreateObject("ADODB.Recordset")

anvNamn		= secure(Request.Form("anvnamn"))
losenord	= secure(Request.Form("losenord"))

SQL = "SELECT niva FROM admin WHERE anvnamn='" & anvnamn & "' AND losenord='" & losenord &"'"
RecSet.Open SQL, Connect, 3, 3

If not RecSet.EOF Then

  Response.Cookies("anvnamn") = RecSet("anvnamn")
  Response.Cookies("niva") = RecSet("niva")

  If RecSet("niva")="1" Then
    strPage="forum/index.asp"
  elseIf RecSet("niva")="2" Then
    strPage="forum/index.asp"
      
  End If
  
  ' Här loggas IP när rätt lösenord och password angetts
  SQL = "INSERT INTO iplogg([username],[ip],[loginstatus],[tid]) values ('"& anvnamn &"','"& Request.Servervariables("REMOTE_ADDR") &"','OK',#"& now() &"#)"
  Connect.execute(SQL)

  Response.Redirect strPage

else

  ' Här loggas IP när fel lösenrod och password angetts
  query="INSERT INTO iplogg([username],[ip],[loginstatus],[tid]) values ('"& anvnamn &"','"& Request.Servervariables("REMOTE_ADDR") &"','Fail',#"& now() &"#)"
  Connect.Execute(query)

  End If
  
  RecSet.Close : set recset = nothing
  Connect.Close : set connect = nothing
      
  Response.Redirect "forum/index.asp"
%>
```

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

## #2 — Peter S, 2008-09-04T18:05Z

```
SQL = "SELECT niva, anvnamn FROM admin WHERE anvnamn='" & anvnamn & "' AND losenord='" & losenord &"'"
```

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

## #3 — Biasse, 2008-09-04T18:11Z

Tack Peter :)

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

## #4 — Biasse, 2008-09-05T15:41Z

Jag försökte gå vidare på detta men stötte på patrull...    Ska inte detta gå ???  När den kom fram till "Response.Cookies("msn") = RecSet("msn")" spikade den ifrån men med dom 4 första bara gick det igenom.

```
SQL = "SELECT niva, anvnamn, losenord, email, msn, land, hemsida, signatur, avatar FROM admin WHERE anvnamn='" & anvnamn & "' AND losenord='" & losenord &"'"

RecSet.Open SQL, Connect, 3, 3

If not RecSet.EOF Then

  Response.Cookies("anvnamn") = RecSet("anvnamn")
  Response.Cookies("niva") = RecSet("niva")
  Response.Cookies("losenord") = RecSet("losenord")
  Response.Cookies("email") = RecSet("email")
  Response.Cookies("msn") = RecSet("msn")
  Response.Cookies("land") = RecSet("land")
  Response.Cookies("hemsida") = RecSet("hemsida")
  Response.Cookies("signatur") = RecSet("signatur")
  Response.Cookies("avatar") = RecSet("avatar")
```

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

## #5 — Peter S, 2008-09-05T15:43Z

Vad är det som händer (eller inte händer)? :)

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

## #6 — Biasse, 2008-09-05T15:44Z

Det går fint till den ska skapa den 5:e kakan (msn)..    Men kör jag bara de 4 första flyter det igenom somom den bara klarar skapa 4 kakor

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

## #7 — Peter S, 2008-09-05T15:45Z

Felmeddelande?

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

## #8 — Biasse, 2008-09-05T15:47Z

Feltyp:
Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer: 'Response.Cookies'
/forum_mitt/kontroll.asp, line 24

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

## #9 — Peter S, 2008-09-05T15:48Z

Innehåller RecSet("msn") någonting?

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

## #10 — Biasse, 2008-09-05T15:51Z

Inte nu...    Måste det göra det?    Om det är så kan man få det att gå utan innehåll?

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

## #11 — Peter S, 2008-09-05T15:52Z

Om något värde kan vara null så använd Response.Cookies("MinKaka") = CStr(RecSet("fältnamn") & "") :)

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

## #12 — Biasse, 2008-09-05T16:26Z

Feltyp:
Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer

Mycket med det här :)

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

## #13 — Peter S, 2008-09-05T18:16Z

Vad har respektive fält i databasen för datatyp?

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

## #14 — Biasse, 2008-09-05T19:36Z

Vi struntar i den biten nu för jag ger varje ett värde om det inte skrivs in nått och då funkar det ändå.

Jag har en annan sak i denna kak röra :)

Jag har gjort en profilsida som jag inte lyckas koppla till rätt id.  Man har loggat in och sen när jag trycker på inställningar ska jag komma till profilsida. Vitsen är ju att man bara ska se den inloggades uppgifter men eftersom jag alldrig kopplat på detta vis vet jag inte hur det ska se ut.  Min nuvarande kod ser ut så här på profilsidan

```
<% 
Response.buffer=True
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../lagret/nisse.mdb") 

Set RecSet = Connect.Execute("select * from admin order by id ASC")

rs_user = 	RecSet("anvnamn") 
rs_anvnamn = 	Request.Cookies("anvnamn")

'If rs_anvnamn = RecSet(anvnamn) Then    
If Request.Cookies("anvnamn") = rs_user Then
%>
```

Jag vet att den inte är riktig på långa vägar och jag vet inte hur jag kopplar den till aktuell inloggad

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

## #15 — Peter S, 2008-09-06T09:58Z

Är admin.id id-numret på användarna?

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/173852-cookies-problem