probleme selection max dans recordset

Version imprimable

04/08/2008, 16h20
marcuscircus

probleme selection max dans recordset
Bonjour, je voudrais récupérer la valeur maximal d'un champ en fonction d'un code client, j'ai donc utiliser un recordset mais cela ne fonctionne pas, voila mon code :
Code:

1 2 dim rs as Recordset Set rs= currentDb.openRecordSet("select max(numenrprod) from technique where codecli = 'forms![parc/cli]![ccli]")
J'ai essayé de faire un msgbox pour voir se que sa renvoyé, et puis erreur sur le msgbox, donc voila, si quelqu'un a une idée !
04/08/2008, 16h39
pev15

Bonjours,

quel code mets tu dans ta message box?
il faut pas mettre le recordset directement, mais le champs du recordset
essaye ça :

Code:

msgbox rs.fields(0).value
04/08/2008, 16h46
marcuscircus

Merci mais malheureusement sa ne marche pas, sa me dit :

erreur d'éxecution '94' : Utilisation incorrect de Null

Mais mon souci n'est pas vraiment pour le msgbox, c'est juste que je veux récupérer le max, lui ajouter 1 et le stocker dans une variable !

Code:

wnumenr = rs("numenrprod")+1

J'ai essayé sa, mais sa marche pas

S'il te met "Incorrecte utilisation de Null", c'est que ta requete n'a renvoyé aucun résultat.

Essaye ça :
Code:

1 2 3 4 5 6 7 8 dim rs as Recordset Set rs= currentDb.openRecordSet("select max(numenrprod) from technique where codecli = 'forms![parc/cli]![ccli]") If rs.EOF = false then msgbox rs(0) +1 else msgbox "Pas de résultat renvoyée par la requête" end if
Si il t'affiche le message d'erreur, alors soit ta table ne contient aucun "numenrprod" associé à "forms![parc/cli]![ccli]", soit il y a une erreur dans la requête (auquel cas regarde le contenu de "forms![parc/cli]![ccli]")

04/08/2008, 16h57
marcuscircus

Il me mets le meme message d'erreur, ma table contient bien des "numenrprod" et la zone que je prends dans mon formulaire (ccli) elle renvoie que des codecli valide !

J'ai fais un msgbox de forms![parc/cli]![ccli] et il me renvoie bien la bonne valeur et il y a des enregistrements pour se client la, donc max numenrprod devrait etre 3 !

Si tu met simplement ce code :

Code:

1
2
3
4
5
6
7
8
 
dim rs as Recordset
Set rs= currentDb.openRecordSet("select max(numenrprod) from technique where codecli = 'forms![parc/cli]![ccli]")
If rs.EOF = false then
    msgbox rs(0)
else
    msgbox "Pas de résultat renvoyée par la requête"
end if

(donc sans faire le "+1") ca fonctionne?

04/08/2008, 17h03
marcuscircus

Sans le +1, toujours la même erreur !

alors, je viens de voir un problème clair :

Code:

1
2
3
4
5
6
7
8
 
dim rs as Recordset
Set rs= currentDb.openRecordSet("select max(numenrprod) from technique where codecli = '" & forms![parc/cli]![ccli] &"'")
If rs.EOF = false then
    msgbox rs(0)
else
    msgbox "Pas de résultat renvoyée par la requête"
end if

Enleve les "quote" si codecli n'est pas de type texte

04/08/2008, 17h10
marcuscircus

merci beaucoup, en effet il était de type numérique, quelle erreur stupide !