eksperthjælp i asp ønskes - form

jeg er låst fast, jeg har følgende problem:

dette script fungerer som jeg ønsker det, men skal kunne vælge forskellig hardware som hentes fra en database \"konfig.mdb\" og det fungerer som sagt fint. MEN jeg skál nu have lavet en \"bestil\" knap, som sender den besøgende videre til en side som hedder bestil.asp, det er dette som giver mig gråt hår.
På denne side skal man kunne se sin bestilling og trykke på en \"send ordre\" knap, som så sender det valgte i en email til mig.
Er det muligt og hvordan?
-------------




<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">
<HTML><HEAD><TITLE>dolphin.asp</TITLE>
<META http-equiv=Content-Type content=\"text/html; charset=windows-1252\">
<META content=\"Microsoft FrontPage 4.0\" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId></HEAD>
<BODY topMargin=0><!
<html>
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"konfig.mdb\")
Conn.Open DSN
%>
<FORM name=dummy>
<TABLE borderColor=#00ff00 cellSpacing=0 cellPadding=0 align=center border=0>
  <TBODY>
  <%
  strSQL = \"Select * from data Where kode = \'1\'\"
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
%> 
<TR><TD>CPU / Mhz</TD>
      <TD><SELECT style=\"WIDTH: 280px; POSITION: relative\" onchange=opdater() size=1 name=cpu>
<%do%>
<OPTION value=<%Response.Write rs(\"pris\") & \">\" %><% Response.Write rs(\"produkt\") %></OPTION>
<%rs.MoveNext
Loop While Not rs.EOF
%>
</SELECT></TD><TD><INPUT size=9 value=0 name=cpupris> </TD></TR>
<%
\' SQL forespørgsel
strSQL = \"Select * from data Where kode = \'3\'\"
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
%>   
<TR><TD>Ram</TD>
      <TD><SELECT style=\"WIDTH: 280px; POSITION: relative\" onchange=opdater() size=1 name=ram>
<%
do
%>
<OPTION value=<%Response.Write rs(\"pris\") & \">\" %><% Response.Write rs(\"produkt\") %></OPTION>
<%rs.MoveNext
Loop While Not rs.EOF
%>
</SELECT>
</TD>
    <TD><INPUT size=9 value=0 name=rampris> </TD></TR>
<%
\' SQL forespørgsel
strSQL = \"Select * from data Where kode = \'6\'\"
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
%> 
<TR><TD>Harddisk</TD>
      <TD><SELECT style=\"WIDTH: 280px; POSITION: relative\" onchange=opdater() size=1 name=harddisk>
<%
do
%>
<OPTION value=<%Response.Write rs(\"pris\") & \">\" %><% Response.Write rs(\"produkt\") %></OPTION>
<%rs.MoveNext
Loop While Not rs.EOF
%>
</SELECT>
</TD>
    <TD><INPUT size=9 value=0 name=harddiskpris> </TD></TR> 
  <TR>
    <TD colSpan=2><B><FONT color=#ff0000>UDSALG PRIS INCL.
      MOMS</FONT></B></TD>
    <TD><INPUT style=\"FONT-WEIGHT: bold; COLOR: #ff0000\"
      size=8 value=0 name=incl></TD></TR></TBODY></TABLE>
<DIV align=center>
<CENTER>
<P><INPUT onclick=\"return nulstil();\" type=reset value=NULSTIL>
</P></CENTER></DIV></FORM>
<SCRIPT language=javascript>
<!--
function opdater()
{
dummy.cpupris.value          = dummy.cpu.options[dummy.cpu.selectedIndex].value;
dummy.rampris.value          = dummy.ram.options[dummy.ram.selectedIndex].value;
dummy.harddiskpris.value    = dummy.harddisk.options[dummy.harddisk.selectedIndex].value;
dummy.incl.value            = (Math.round(dummy.cpupris.value) + Math.round(dummy.rampris.value)+ Math.round(dummy.harddiskpris.value));

}

opdater();

function nulstil()
{
    document.dummy.reset();
    opdater();
    return false;
}
-->
</SCRIPT>
</BODY></HTML>