verification d'une page ASP en raison de deux recordset

**leclone** · 18/05/2006, 09h18

voici ma page asp :

<html>

<head>

<title>Confirmation ajout ordinateur portable</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>

<% LECLONEPORT=Request.QueryString ("lecloneport")%>
<% REFPORT=Request.QueryString ("refport")%>
<% MODELEPORT=Request.QueryString ("modeleport")%>
<% TYPEPORT=Request.QueryString ("typeport")%>
<% MEMOIREPORT=Request.QueryString ("memoireport")%>
<% DDPORT=Request.QueryString ("ddport")%>
<% PRIXPORT=Request.QueryString ("prixport")%>
<% COMMANDEORDI=Request.QueryString ("commandeordi")%>
<% REFFOUR=Request.QueryString ("reffour")%>
<% GRAPH=Request.QueryString ("graph")%>
<% OPTIQUE=Request.QueryString ("optique") %>
<% WIFI=Request.QueryString ("wifi")%>
<% OS=Request.QueryString ("os")%>
<% WEBCAM=Request.QueryString ("webcam")%>

<%'-------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")
Set RS1 = Server.CreateObject ("ADODB.Recordset")%>

<%'-------définition et exécution de la requête---------------
RequeteSQL = "INSERT INTO Portable (Ref_leclone,Ref_portable,Modele_portable,Ecran_portable,Cpu_portable,Memoire_portable,Disquedur_portable,PrixTTC_portable,Acheter_portable,Ref_fourni) VALUES ('"&LECLONEPORT&"','"&REFPORT&"','"&MODELEPORT&"','"&TYPEPORT&"','"&MEMOIREPORT&"','"&DDPORT&"','"&PRIXPORT&"','"&COMMANDEORDI&"','"&REFFOUR&"')"
RequeteSQL1 = "INSERT INTO Description(Model_portable,graphique,optique,wifi,os,webcam,Ref_leclone) VALUES ('"&MODELEPORT&"','"&GRAPH&"','"&OPTIQUE&"','"&WIFI&"','"&OS&"','"&WEBCAM&"','"&LECLONEPORT&"')"
RS.Open RequeteSQL , Conn
RS1.Open RequeteSQL1, Conn%>
<%if RS.EOF then %>
Une erreur est survenue, réessayez plus tard !!!!
<%else%>
L'ordinateur a bien été ajouté dans la base de données.<BR>
<a href="gestionbase.asp">RETOURNER CHOIX </a>

<%end if%>

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

</body>

</html>

tout d'abord, je recuperer les valeurs qui ont ete saisies dans un formulaire
ensuite,ces donnees vont être insérées dans 2 tables. Pour cela, g fait 2 requete SQL donc 2 recordset.

Je voudrais savoir si ma page est correcte cad si l'utilisation des 2 requetes et des 2 recordset est cohérente

merci d'avance

Edité par immobilis pour les balises de [code]
Reedité pour remplacer les balises de [code] par des balises de [quote]

**Phiss** · 18/05/2006, 10h23

A première vue pas de problème.
Reste que tu fais des fermeture et ouverture de code inutile.

A chaque fois que tu as %> avant <% tu peux les dégager...

**leclone** · 18/05/2006, 10h28

oki merci

@++

**shinrei** · 19/05/2006, 13h34

De plus, tu devrais utiliser la method post au lieu de get.
Ce qui te laisse un url propre sans données affichees.

ciao,

verification d'une page ASP en raison de deux recordset

ASP

Discussions similaires

Partager

Partager