Récuperer valeur d'une Requete sum de access dans du vb

cs_Juliendu88 Messages postés 39 Date d'inscription lundi 19 avril 2004 Statut Membre Dernière intervention 17 juin 2004 - 17 juin 2004 à 09:05
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 - 17 juin 2004 à 09:11
Bonjour a tous, dans un formulaire access, je fais appel a une requete (select sum(champ) as congés from....) grace au code suivant :

Dim stDocName As String
stDocName = "REQUETE SUM"
DoCmd.OpenQuery stDocName, acViewNormal, acEdit

Il faut que je trouve un moyen de récupérer la valeur retournée par cette requête ....

C'est tres tres tres urgent;

Merci beaucoup !!

1 réponse

cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
17 juin 2004 à 09:11
En VB ca donne ca :

Set Db = OpenDatabase(CheminBase) ' Définition base de donnéeSet SommeValeur Db.OpenRecordset("SELECT sum(Quantite) as Somme FROM Article WHERE Reference '" & Valeur & "'and Annee = " & An & "")

Resultat = IIf(IsNull(SommeValeur("Somme")), 0, SommeValeur("Somme"))

It@li@
0