Hent værdi i en cookie med Request.Cookies?

Response.Write(Request.Cookies("CupZone")("LOGINNAME")) burde da virke... sikker på at cookien eksisterer og at du bruger de samme store og små bogstaver som da du oprettede den?

hmm, underligt, for det virker ikke...

og ja, cookien eksisterer, da jeg sagtens kan logge på osv, men kan bare ikke få den til at skrive denne del af cookien ud i browseren...

Er der en måde og skrive hele en cookie ud på? For at se hvad der står i den...

Du kan se den i mappen cookies c:\Documents and Settings\login navn\cookies (hvis det xp/2000)

Hvordan opretter du dem?

Jeg bruger:
Response.Cookies("blabla") = lala
Response.Cookies("blabla").Path = "/"
Response.Cookies("blabla").Expires = Date+1000

for at være sikker på at det virker.

Sådan her ser min fil ud hvor jeg logger ind, og skriver cookien, session osv:


                        <%
                        mohaaCupZone = "mohaaCupZone"
                       
                        if request.form("UserName")="" or request.form("PassWord")="" then
                            response.redirect("login.asp?reason=nologin")
                        end if
                        strUsername=replace(request.form("UserName"),"'","''")
                        strPassword=replace(request("PassWord"),"'","''")

                        sql="select * from T_USERS where M_PASSWORD='"&strPassword&"' and M_USERNAME='"&strUsername&"'"
                            set rs=conn.execute(sql)
                        id = rs("id")
                        if not rs.EOF then
                       
                        ' Bygger noget cookie værk op så vi har det :)
                        Response.Cookies("CupZone").Path = mohaaCupZone
                        Response.Cookies("CupZone")("LOGINID") = id
                        Response.Cookies("CupZone")("LOGINNAME") = Request.Form("UserName")
                        Response.Cookies("CupZone")("PASSWORD") = Request.Form("PassWord")
                       
                        ' Sætter sessions ID, Loginname og Password til det som bliver indtastet.
                        Session("LOGINID") = id
                        Session("LOGINNAME") = Request.Form("UserName")
                        Session("PASSWORD") = Request.Form("PassWord")
                       
                        ' Re-directer til default.asp & sætter cookie expire date
                        Response.Redirect("default.asp?mode=godkendt") 
                        Response.Cookies("CupZone").Expires = dateAdd("d", 30, now()) 
                       
                          else
                              response.redirect("default.asp?mode=wrong")
                        end if
                        %>

hmm, nu jeg får set på cookiesne, så tror jeg sku egentlig ikke de bliver skrevet ordenligt. Hvis du selv vil se kan du se www.jokester.dk/cup og bruge test/test som login....

Du kan liste indholdet således:

Dim Cookie, Key
For Each Cookie In Request.Cookies
  If Request.Cookies(Cookie).HasKeys Then
      Response.Write Cookie & "<br>"
      For Each Key In Request.Cookies(Cookie)
        Response.Write Key & " = "
        Response.Write Request.Cookies(Cookie)(Key)
        Response.Write "<BR>"
      Next
  Else
      Response.Write Cookie & " = " & Request.Cookies(Cookie) & "<BR>"
  End If

Prøv at sætte udløbsdatoen samtidig med, du sætter værdien.

Hvad skal ændres i det kode?

Response.Cookies("CupZone")("LOGINID") = id
Response.Cookies("CupZone")("LOGINNAME") = Request.Form("UserName")
Response.Cookies("CupZone")("PASSWORD") = Request.Form("PassWord")
Response.Cookies("CupZone").Path = "/"
Response.Cookies("CupZone").Expires = Date+1000

Response.Cookies("CupZone").Path = mohaaCupZone
Response.Cookies("CupZone")("LOGINID") = id
Response.Cookies("CupZone")("LOGINNAME") = Request.Form("UserName")
Response.Cookies("CupZone")("PASSWORD") = Request.Form("PassWord")
Response.Cookies("CupZone").Expires = dateAdd("d", 30, now())

@ netro, din virker ikke. Det er samme resultat
@ ducks, din ser ud til at virke, men jeg kunne ikke få / til at funke i går aftes...

Netro, vil du tjene 30 points for at vise mig hvordan den list cookies virker?

og tak for hjælpen btw ducks

np... Det kan have været hvis du glemte at sætte "" udenom /

nej, er ret sikker på at jeg boxede den inde... men skidt med det, det kører nu :)

Hvad er det, du ikke forstår ved den?

http://www.jokester.dk/cup/test_listcookie.asp

direkte kopi af det du har givet mig

Du mangler bare et next allernederst..

For Each Cookie In Request.Cookies
  '.....
Next

huh?

Dim Cookie, Key
For Each Cookie In Request.Cookies
  If Request.Cookies(Cookie).HasKeys Then
      Response.Write Cookie & "<br>"
      For Each Key In Request.Cookies(Cookie)
        Response.Write Key & " = "
        Response.Write Request.Cookies(Cookie)(Key)
        Response.Write "<BR>"
      Next
  Else
      Response.Write Cookie & " = " & Request.Cookies(Cookie) & "<BR>"
  End If
Next '<----------------------Tilføjet!

sm00th :)

2 secs

http://www.eksperten.dk/spm/362306

besvar der, da får du de 30 points :)

Hvordan sletter jeg så en cookie?

Response.Cookie("cookienavn")("")

Hov, Cookies

Det der kan jeg ikke få til at virke