VB6 SQL having

Bonjour

je désire transferer dans une base acess les données d'une autre base en selectionnant les personnes dont la somme des montants est supérieur à 1500
J'ai effectué cette requete mais cela ne me donne pas la bonne sélection...

Code:

---

1 2 3 4 5 6 7 8

Mnum=1500 'debut et fin sont les dates de références 'NOMEXP est le champs de référence   Set db = DBEngine.Workspaces(0).OpenDatabase("C:\test.mdb") Requete$ = "INSERT INTO TABLE1 IN 'C:\test2.mdb' SELECT * From TABLE1 WHERE [DATE] between #" & DEBUT & "# and #" & FIN & "# and [NOMEXP] In (SELECT [NOMEXP] FROM [TABLE1] As Tmp GROUP BY [NOMEXP],[prenomexp] HAVING SUM(MONTANT)> " & Mnum & ")" db.Execute Requete$ db.Close

---

Merci d'avance

dumedo

Citation:

---

Envoyé par DUMEDO

Bonjour
.....
J'ai effectué cette requête mais cela ne me donne pas la bonne sélection...
.....

---

Ce qui aiderait peut être à te proposer une réponse, c'est que tu nous dises se qui est déjà retournée par ta requête.

Bonjour

cette requête me copie tous les enregistrements dans la période considérée.

@+