recuperation d'une valeur : changement automatique dans un panier

**leclone** · 29/05/2006, 14h20

bonjour a tous !!!

je suis en train de faire un panier pour commander en ligne des produits

je n'arrive pas a tout faire sur la meme page cad le pb se trouve au niveau de la quantite

si l'utilisateur ne change pas de quantite ca va mais s'il change, je ne sais pas comment changer automatiquement

voici le codage de ma page commander.asp :
<code>
<html>

<head>
<link rel="stylesheet" type="text/css" href="style.css">
<title>Achat d'un produit</title>
</head>

<body>
<table border="1" cellpadding="0" cellspacing="0" style="border-width:0; border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1" height="130">
<tr>
<td width="100%" height="130" valign="middle" style="border-style: none; border-width: medium">
<p align="right">
<img border="0" src="../logo/logo1.gif" align="left" width="193" height="111"></td>
</tr>
</table>
<p align="center"><b><u><font color="#0000FF" size="5">Votre panier : </font></u></b></p>

<% ref=Request.QueryString ("ref")%>

<%'-------déclaration de la base------------------------------
DSN_BASE = "DBQ=" & Server.Mappath("webleclone.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25"%>

<%'-------création de la connection et du recordset-----------
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open DSN_BASE
Set RS = Server.CreateObject("ADODB.Recordset")%>

<%'-------définition et exécution de la requête---------------
RequeteSQL = "SELECT R_materiel.Ref_materiel, R_materiel.Nom_materiel, R_materiel.PrixHT_materiel FROM R_materiel WHERE R_materiel.Ref_materiel = '"& ref &"'"
RS.Open RequeteSQL , Conn
if RS.EOF then %>
Cette article ne se trouve plus dans la base de données. Essayez un autre article !!
<%else%>

<Table border="1" width="810" align="center" bordercolor="black">
<TR>
<TH width="112" bgcolor="#808080"><font color="#FF0000">Référence</font></TH>

<TH width="252" bgcolor="#808080"><font color="#FF0000">Article</font></TH>

<TH width="124" bgcolor="#808080"><font color="#FF0000">Prix Unitaire HT</font></TH>
<TH width="263" bgcolor="#808080"><font color="#FF0000">Quantité</font></TH>
<TH width="263" bgcolor="#808080"><font color="#FF0000">Prix HT</font></TH>

</TR>

<%Do While Not RS.EOF%>

<TR>
<TD width="112"><font color="#000000"><%=RS("Ref_materiel")%></font>  </TD>
<TD width="252"><font color="#000000"><%=RS("Nom_materiel")%></font>  </TD>
<TD width="124"><font color="#000000"><%=RS("PrixHT_materiel")%> €</font> </TD>
<TD width="263"><font color="#000000"><form action="Commander.asp" method="get"><input type="text" name="quantite" size="3" value="1"> <input type="submit" value="Valider"></form></TD>

<TD width="263"><font color="#000000"><%=RS("PrixHT_materiel")%> €</font> </TD>

</TR>

<TR>
<TD width="1014" colspan="5">
<p align="right"><font color="#000000">Total HT : <%=RS("PrixHT_materiel")%> € </font>
<p align="right"><font color="#000000"><% response.write ("Total TTC (TVA : 19.6) : " & RS("PrixHT_materiel")*1.196 & " €")%></font>
<p align="right"><font color="#000000"><% response.write ( "Frais de port : 4,90 € ")%></font>
<p align="right"><font color="#000000"><% response.write ("Net à payer : " & (RS("PrixHT_materiel")*1.196)+4.90 & " € ")%>
</TD>

</TR>

<%RS.MoveNext%>
<%Loop %>

</table>

<%end if%>

<%'-------fermeture de la connection et du recordset----------
Set RS = Nothing
Conn.Close
Set Conn = Nothing%>

</body>

</html>
</code>

concretement, je voudrai que qd l'utilisateur change la quantité d'un produit commander, il faut que tt ce change automatiquement

j'espere que je me suis fait comprendre

merci d'avance