Webshop, hjælp til sessions

Hej jeg er ved at lave en webshop i forbindelse med et projekt...

Jeg er ikke helt sikker på hvordan sessions virker... Hvordan kan jeg tilføjde varer til min kurv? Er det ikke noget i til med det her?

----------

varer.asp:

<%
' Session
Session("Kurv") = Now
Session("Antal") = Now
%>
<html>
<title>Varer</title>
<head>
</head>
<body>
<% response.write "Varer i butikken:" %>
<br>
<br>
<%
' Databaseforbindelse
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/db/db.mdb")
Conn.Open DSN

' SQL forespørgsel
strSQL = "Select * from varer1"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)

' Gennemløb Recordset (rs) med en løkke
Do
%>
<b>
<%
  ' Udskriv værdien af kolonnerne
  Response.Write rs("produkt") & "</b> <BR> " & rs("beskrivelse") & " <BR> På lager: " & rs("lager") & " - Pris: " & rs("pris") & "Kr." & "<BR>" & " VareID: " & rs("produktnummer")
%>
<BR>
<a href=kurv.asp?Varenr=<%Response.Write rs("produktnummer")%> target=\"hemligframe\">Tilføj til kurv.</a>
<BR>
<BR>
<%
  ' Gå til næste Record i rs
  rs.MoveNext

' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
</html>

----------
kurv.asp

<%
iAntalElementerIKurv = Session("Antal")
arrKurv = Session("Kurv")
arrKurv(iAntalElementerIKurv) = Request.Querystring.Item("produknummernummer")
iAntalElementerIKurv = iAntalElementerIKurv + 1
Session("Antal") = iAntalElementerIKurv
Session("Kurv") = arrKurv

Response.Write "Din vare er tilføjet"
%>

Jeg er ikke lige helt super god til det ASP endnu, håber der er en der kan hjælp

Ron