Un recordSet en parametre dans une requete SQL

Version imprimable

Bonjour;

j'ai une erreur sur ma requete voici mon code :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Else
        MsgBox "mutli"
             If TabTempo![e-mail Consolidation] <> Empty Then
             Dim TabTempoConsolidation As DAO.Recordset, TabID As DAO.Recordset, listLegalEntities As Variant
             
             'MsgBox
             Set TabTempoConsolidation = Mba.OpenRecordset("SELECT DISTINCT [Consolidation Req].[legal entity] FROM [Consolidation Req] WHERE [Consolidation Req].[Product name Consolidation]= '" & TabTempo![Product name] & "' And [Consolidation Req].[e-mail Consolidation]= '" & TabTempo![e-mail] & "' AND [Consolidation Req].[Email Status]= False ") 'GROUP BY [Consolidation Req].[legal entity]
             
             
             
             Set TabID = Mba.OpenRecordset("SELECT [Reach Contacts].Name, [Reach Contacts].Address, [Reach Contacts].City, [Reach Contacts].Email From [Reach Contacts], '" & TabTempoConsolidation & "'WHERE [Reach Contacts].[Name]=[TabTempoConsolidation].[legal entity]")
             
             listLegalEntities = TabID.GetRows ' put all the iformation in a table
        End If

Voici ma requete ; j'ai une erreur au niveau de SET TabID ,j'essaye de faire une erreur avec une jointure entre une des tables temporaires et une table dans ma base .

Merci de votre aide

06/12/2007, 16h29
DMboup

TabTempoConsolidation n'est pas une table temporaire mais bien un recordset. Tu ne peux pas l'utiliser comme tu le fais dans ton second recordset.

Pourquoi n'essaie tu pas de faire une requête sur les tables [Consolidation Req] et [Reach Contacts] puisque apparamment se sont les deux à lier?
06/12/2007, 16h33
Mat.M

Citation:

Envoyé par skillipo

Voici ma requete ; j'ai une erreur au niveau de SET TabID ,j'essaye de faire une erreur avec une jointure entre une des tables temporaires et une table dans ma base .

Merci de votre aide

Et JOIN LEFT/RIGHT ça sert à quoi ? :D
Y'a des bons tutos sur SQL
Un truc tout simple: utiliser le générateur de requêtes SQL il fera cela tout seul...
Et faire une jointure dans la requête SQL directement cela sera plus rapide que d'utiliser des recordsets conjointement.
06/12/2007, 16h52
skillipo
MERCI BEAUCOUP , a force de m'acharner sur ce truc j'ai pa avancé :? .

ma question c'est : le resultat de la requete est ce que je le le mettre dans un TAbleau que je colle sur EXCEL .

Exemple :
Code:

1 2 3 4 5 Dim listLegalEntities As Variant Set TabID = Mba.OpenRecordset(" SELECT .........") listLegalEntities = TabID.GetRows ' put all the iformation in a table
MERCI
06/12/2007, 16h53
Jean-Philippe André

salut, pour coller le résultat d'une requete dans exceltu peux utiliser CopyFromRecordSet directement ;)

bonjour

voici ma requete

Code:

1
2
3
 
 
 Set TabTempoConsolidation = Mba.OpenRecordset("SELECT Name, Address, City, Email FROM [Reach Contacts] WHERE Name IN (SELECT DISTINCT [legal entity] FROM [Consolidation Req] WHERE [Consolidation Req].[Product name Consolidation]= '" & TabTempo![Product name] & "' And [Consolidation Req].[e-mail Consolidation]= '" & TabTempo![e-mail] & "' AND [Consolidation Req].[Email Status]= False ")

j'ai une erreur Dessus .

MERCI

06/12/2007, 16h59
skillipo

pour la requete j'avais oublié une parenthése ca marche aparement , je vais essayer de la coller directement de mon recordset et je vous tiens au courant

MERCI