pb requête dans un code Vba

Question

je voudrais executer une requête qui me renvoie l'enregistrement ayant la valeur la plus grande.

cmd.commandtext= "select max(num_ordre) from determination where num_dtr= ' " & dtr.value & " ' "

il y a un pb avec la fonction max qu'il ne reconnait pas.

Un deuxième pb, sur une requête aussi: j'essaye de récupérer les enregistrements qui commencent par 'A' avec 

cmd.commandtext="select num_dtr from determination where num_dtr like 'A%' "

pareil ça marche pas...

merci.

cs_hasen · Answer

Pour l'histoire du max essai plutot de faire ca, chez moi ca marche parfaitement :

    Dim db As Database
    Dim rs As Recordset
    Dim max As String
    
    Set db = CurrentDb()
    Set rs = db.OpenRecordset("select max(Effectif) as nb from Organisme;", dbOpenDynaset)
    num = rs("nb")
    Org.Value = max

J'ai fais ce test avec ma propre base de données, où Organisme est une table comprenant toutes les entreprises, Effectif est un champs de cette table de type numérique et Org est un champs texte du formulaire qui permet d'afficher le resultat de la requete pour vérifier.

Dis le moi si ca ne marche pas!

sleepman23 · Answer

Pour ta requête de sélection, essaye de remplacer ton % par * pour voir. je garantis rien par contre ;)

Pb requête dans un code Vba

2 réponses

Discussions similaires