pb asp : page pour commander en ligne
bonjour a tous !!!
g une page asp qui permet de visuliser tous les claviers d'ordinateur que vend une entreprise informatique
dans cette page, il y a un lien permettant de commander un produit (donc dans ce cas, un clavier) mais le pb, c'est que je ne sais pas comment dire a l'ordinateur que quand je clic sur le premier commander que cela correspond a la premiere ligne de la base concernant les claviers
j'espere que j'arrive a me faire comprendre.
(je suis en stage et je galere sur le fait que je n'arrive pas a faire la page me permettant de pouvoir commander en ligne)
en fait voila ma page asp :
code :
<head><title>Le Clone --> Les claviers</title>
<link rel="stylesheet" type="text/css" href="style.css">
</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">Les claviers : </font></u></b></p>
<%'-------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 Ref_materiel,Photo_materiel,Nom_materiel,Type_materiel,Marque_materiel,PrixHT_materiel,Dispo_materiel,Acheter_materiel from Matériel where Ref1_leclone like 'clavier%'"
RS.Open RequeteSQL , Conn
if RS.EOF then %>
Nous n'avons aucun articles à vous proposer
<%else%>
<Table border="1" width="667" align="center" bordercolor="black">
<TR>
<TH width="70"><font color="#FF0000">Référence</font></TH>
<TH width="67"><font color="#FF0000">Produit</font></TH>
<TH width="152"><font color="#FF0000">Nom</font></TH>
<TH width="64"><font color="#FF0000">Type</font></TH>
<TH width="56"><font color="#FF0000">Marque</font></TH>
<TH width="75"><font color="#FF0000">Prix HT</font></TH>
<TH width="86"><font color="#FF0000">Disponibilité</font></TH>
<TH width="72"><font color="#FF0000">Acheter</font></TH>
</TR>
<%Do While Not RS.EOF%>
<TR>
<TD width="70"><font color="#000000"><%=RS("Ref_materiel")%> </font> </TD>
<TD width="67"><font color="#000000"><%=RS("Photo_materiel")%> </font> </TD>
<TD width="152"><font color="#000000"><%=RS("Nom_materiel")%> </font> </TD>
<TD width="64"><font color="#000000"><%=RS("Type_materiel")%></font> </TD>
<TD width="56"><font color="#000000"><%=RS("Marque_materiel")%></font> </TD>
<TD width="75"><font color="#000000"><%=RS("PrixHT_materiel")%></font> </TD>
<TD width="86"><font color="#000000"><%=RS("Dispo_materiel")%></font> </TD>
<TD width="72"><font color="#000000"><a href="commander.asp"><%=RS("Acheter_materiel")%></a></font> </TD>
</TR>
<%RS.MoveNext%>
<%Loop %>
</table>
<%end if%>
<%'-------fermeture de la connection et du recordset----------
Set RS = Nothing
Conn.Close
Set Conn = Nothing%>
<p align="center"> </p>
<p align="center"><font color="#000000"><a href="claviers.asp">
<img border="0" src="../logo/flechehautdepage.gif">Haut de page</a> |
<a href="mailto:webmasterjerome@hotmail.com,leclone@wanadoo.fr?subject=info!!!!!">
Commentaire</a></font></p>
</body>
pouvez vous m'aider dans cette manipulation
merci d'avance
Répondre avec citation
Partager