Session

Hej jeg er ved at lave et salgs system hvor den gemmer nogle data i session men af en eller anden grund kan den kun vise disse sessions 1 gang.
i kan se siden på denne adresse: 80.63.226.208
og her er koden så!
Bestillings siden:


<head>
<title></title>
</head>

<body background="../bg.jpg">
<%'  vare1  %>
<form action="vare.asp">
<p align="center">
<input type="hidden" name="vare" value="vare1"><b><font face="Arial Black">AMD
Thunderbird 1400 MHz 256 DDR ram 40 GB HD Geforce2 MX 400 tv-out.&nbsp;</font></b>
<p align="center">
<input name="tal" size="2" value="1">
<input type="hidden" name="pris" value="7000.-">
<input type="submit" value="køb">
</p>
</form>
<hr>
<%'  vare2  %>

<form action="vare.asp" method="send">
<p align="center">
<input type="hidden" name="vare" value="vare2"><b><font face="Arial Black">256
MB Hundai DDR ram</font></b>&nbsp;
<p align="center">
<input name="tal" size="2" value="1">
<input type="hidden" name="pris" value="800.-">
<input type="submit" value="køb">
</form>

<%'  vare3  %>

<form action="vare.asp">
<p align="center">
<input type="hidden" name="vare" value="vare3">
<input name="vare3_tal" size="2" value="1">
<input type="hidden" name="pris" value="2500.-">
<input type="submit" value="køb">
</form>

<-------den side der tilføjer sessions:------->

<%
Session.Timeout = 60
if session("vare") = "ok" then
session("vare") = "ok"
end if




' vare1

if request.querystring("vare") = "vare1" then
session("vare1") = "vare nr.1"
session("vare") = "ok"
session("1-antal") = request.querystring("tal")
response.redirect "default.asp"
end if



' vare2

if request.querystring("vare") = "vare2" then
session("vare2") = "vare nr.2"
session("vare2_info") = "256 DDR Hundai ram <br><br>"
session("vare") = "ok"
session("pris-2") = request.querystring("pris")
session("2-antal") = request.querystring("tal")
response.redirect "default.asp"
end if


' vare 3

if request.querystring("vare") = "vare3" then
session("vare3") = "vare nr.3"
session("vare3_info") = "Varen er midlertidigt ikke at skaffe<br><br>"
session("vare") = "ok"
session("pris-3") = request.querystring("pris")
session("3-antal") = request.querystring("tal")
response.redirect "default.asp"

end if

%>

<---den side der viser varrene:--->




<head>
<title></title>
</head>

<body background="../bg.jpg">

<center>
<a href="<%Session.Abandon%>">Klik her for at slette alle dine varer.</a>
</center>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN1 = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN1 = DSN1 & "DBQ=" & Server.MapPath("varedb.mdb")
Conn.Open DSN1


%>


<%
if session("vare") = "ok" then
session("vare") = "ok"
end if

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("varedb.mdb")
Conn.Open DSN


if session("vare1") = "vare nr.1" then

sql = "SELECT * FROM vare WHERE varenavn =1"
Set Rs = Conn.Execute(sql)

%>
<center>
</td><br>
    </tr>
  </table>
  </center>
<div align="center">
  <center>
  <table border="1" width="65%" bgcolor="#E0DADA" cellspacing="0" cellpadding="0" bordercolorlight="#000000">
    <tr>
      <td width="100%">
        <p align="center">Vare nr:&nbsp;<%response.write rs("varenavn")%></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center"><center><%response.write rs("info")%></center></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center"><%response.write "antal:&nbsp;"
response.write session("1-antal")%></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center"><%response.write rs("pris")%></td>
    </tr>
  </table>
  </center>
</div>

<%
end if
Conn.Close
Set Conn = Nothing

'vare2
if session("vare2") = "vare nr.2" then
%>
<center>
</td><br>

    </tr>
  </table>
  </center>
<div align="center">
  <center>
  <table border="1" width="65%" bgcolor="#E0DADA" cellspacing="0" cellpadding="0" bordercolorlight="#000000">
    <tr>
      <td width="100%">
        <p align="center"><%response.write session("vare2")%></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center"><%response.write session("vare2_info")%></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center"><%response.write "antal:&nbsp;"
response.write session("2-antal")%></td>
    </tr>
    <tr>
      <td width="100%">
        <p align="center"><%response.write session("pris-2")%> pr stk og i alt: <%Function pris(session)

  session("1-antal") * session("pris-1") + session("2-antal") * session("pris-2")
End Function%></td>
    </tr>
  </table>
  </center>
</div>
<%
end if
if session("vare") = "" then
response.redirect "ingen_varer.asp"
end if
%>