cs_Ragnar69
Messages postés20Date d'inscriptionjeudi 26 février 2004StatutMembreDernière intervention24 juin 2004
-
12 mai 2004 à 11:46
cs_Ragnar69
Messages postés20Date d'inscriptionjeudi 26 février 2004StatutMembreDernière intervention24 juin 2004
-
12 mai 2004 à 16:07
Bon c mon premier script en ASP...
j'arrive a me connecter ma a base et à afficher une table donnée.
ensuite j'aimerai faire la chose suivante:
j'ai une table Devis qui comporte un champ id_corres
et j'aimerai me déplacer dans la table Devis sur cet id_corres et afficher les infos d'une table Corres en relation avec l'id_corres.
je pensait imbriquer 2 boucles for sur 2 Recordset différent mais sa m*rde...voici mon code si vous pouvez m'aider sa serait cool !
dim objRecordset
set objRecordset = Server.CreateObject("ADODB.Recordset")
dim objRecordset2
set objRecordset2 = Server.CreateObject("ADODB.Recordset")
objRecordset.Open "SELECT * FROM devis;", Conn, 3
%>
Voici la liste des sites, par ordre d'inscription...
<%
Do While not objRecordset.eof
Response.Write(objRecordset("id_devis"))
id_cor = objRecordset("id_correspondant")
objRecordset2.Open "SELECT * FROM correspondant WHERE id_correspondant=id_cor;", Conn, 3
Do While not objRecordset2.eof
Response.Write(objRecordset2("representant"))
objRecordset2.MoveNext
loop
objRecordset.MoveNext
loop
set objRecordset=nothing
set objRecordset2=nothing
set Conn=nothing
%>
cs_Ragnar69
Messages postés20Date d'inscriptionjeudi 26 février 2004StatutMembreDernière intervention24 juin 2004 12 mai 2004 à 15:57
Bon je suppose ke la fonction que tu me proposes : cLng() doit etre une sorte de conversion pour récupérer mon id_correspondant en type Long...
si c bien sa j'ai deja essayer cInt sans succès....
eh bien j'ai modifier mon script tant bien que mal voici le nouveau code, je te passe la déclaration des variables et des objets de Connexion...
set objRecordset = Server.CreateObject("ADODB.Recordset")
objRecordset.Open "SELECT * FROM devis;", Conn, 0,3
set objRecordset2 = Server.CreateObject("ADODB.Recordset")
objRecordset2.Open "SELECT * FROM correspondant WHERE id_correspondant=id_cor;", Conn, 0,3
Do While not objRecordset2.eof
Response.Write(objRecordset2("representant"))
objRecordset2.MoveNext
loop
set objRecordset2 =nothing
objRecordset.MoveNext
loop
set objRecordset=nothing
set objRecordset2=nothing
set Conn=nothing
je pense qu'il doit y avoir un pb avec ma variable id_cor dans ma requete SQL...
message d'erreur:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Pilote ODBC Microsoft Access] Trop peu de paramètres. 1 attendu.
/Ageneau/affichage_devis.asp, line 29
la ligne 29 est celle en gras (l'open sur objRecordset2)