Discussion :

[DUMEDO]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[ProgElecT]

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.

[DUMEDO]

Bonjour

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

@+