Δουλεύοντας με Cookies

Τρίτη, 25 Μαΐου 2010

[x] Αποστολή σε φίλο

Τι είναι

Τα cookies είναι ένας τρόπος αποθήκευσης πληροφορίας στον Η/Υ ενός χρήστη σχετικά με την περιήγηση του σε μια ιστοσελίδα. Αποτελείται από ένα απλό αρχείο κειμένου με δεδομένα. Κάθε φορά που ο χρήστης επισκέπτεται την ιστοσελίδα που της ανήκει το cookie, γίνεται ανάκτηση των αποθηκευμένων πληροφοριών.
Ένα παράδειγμα χρήσης: Αποθήκευση προτιμήσεων σε μια ιστοσελίδα (πχ i-google).

Αποθηκεύοντας ένα cookie

Για να αποθηκεύσουμε ένα Cookie καλούμε την συνάρτηση response.cookies()
Προσοχή! Θα πρέπει να καλέσετε την response.cookies() πριν εμφανίσετε οποιοδήποτε HTML κώδικα στην σελίδα.

<%
Response.Cookies("onoma")="Webmasters"
Response.Cookies("onoma").Expires = Date() + 10
%>

Στο παράδειγμα μας δημιουργήσαμε ένα cookie με όνομα "onoma" και η τιμή του είναι το "Webmasters". Στο expires δηλώνουμε τις μέρες που θα διαρκέσει.. (10 ημέρες από σήμερα)
Αν θέλαμε στατική ημερομηνία, απλά γράφουμε .Expires = #July 10,2009#

Διαβάζοντας ένα cookie

Έστω ότι αποθηκεύσαμε το cookie. Για να διαβάσουμε τα περιεχόμενα του, απλά καλούμε την μέθοδο request.cookies(όνομα) όπου όνομα το cookie που μας ενδιαφέρει. Αν θέλουμε να ελέγξουμε αν υπάρχει cookie χρησιμοποιούμε την isset().

<%
Ιf IsEmpty(request.cookies(onoma) Then
Response.write("Γεία σου ανώνυμε!")
Else
onoma = Request.cookies(onoma) Response.write(Γεία σου " & onoma )
End If
%>

Αν θέλουμε να δούμε όλα τα cookies που αποθηκεύσαμε σε ένα χρήστη μπορούμε να καλέσουμε την εξής λειτουργία

<%
Function PrintCookies
Dim strResult
For Each cookie in Request.Cookies
strResult = strResult & cookie & ": " & Request.Cookies(cookie) &
"<br> /" & vbCrLf
Next
PrintCookies = strResult
End Function
%>

Διαγράφοντας ένα cookie

Αν θέλουμε να διαγράψουμε ένα cookie απλά το θέτουμε πάλι με την .Expires αλλά βάζουμε μια ημερομηνία στο παρελθόν (αρνητική).

<%
Response.Cookies("onoma").Expires = Date() - 10
%>

(Δεν υπάρχουν σχόλια)