Discussion :

[fevec]

bonjour à tous,

J'ai une requête tout simple
avec 2 champs concaténés et séparés par :

Code :

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

1
2
3
4
 
SELECT Ordonnances.CodeOrdonnance, [Actes]![Libelle] & " : " & [ActesParVisite]![quantite] AS Intervention
FROM Ordonnances INNER JOIN (Actes INNER JOIN ActesParVisite ON Actes.CodeActe = ActesParVisite.CodeActe) ON Ordonnances.CodeOrdonnance = ActesParVisite.CodeOrdonnance
WHERE (((Ordonnances.CodeOrdonnance)="70084"));

J'ai donc un souci "classique" de délimiteur lorsque je veux utiliser cette syntaxe SQL avec DAO

(Je me suis inspiré de http://access.developpez.com/sources...QLLigneColonne)

Code :

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

1
2
3
4
Dim res As DAO.Recordset
Dim SQL As String
SQL = "SELECT Ordonnances.CodeOrdonnance, [Actes]![Libelle] & [ActesParVisite]![quantite] AS Intervention FROM Ordonnances INNER JOIN (Actes INNER JOIN ActesParVisite ON Actes.CodeActe = ActesParVisite.CodeActe) ON Ordonnances.CodeOrdonnance = ActesParVisite.CodeOrdonnance WHERE Ordonnances.CodeOrdonnance = '" & CodeOrdonnance & "'"
Set res = CurrentDb.OpenRecordset(SQL)

dans le code SQL ci-dessus qui fonctionne je n'arrive pas à insérer l'instruction

Code :

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

[Actes]![Libelle] & " : " & [ActesParVisite]![quantite] AS Intervention

pour que le résultat soit :

"Echographie : 2" ET NON PAS "Echographie2"

Cela doit être simple.....!!!
avec des & et des "" et des ''',
Une piste...
Par avance, un énorme merci !

fevec

[Kloun]

Code :

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

SQL = "SELECT Ordonnances.CodeOrdonnance, [Actes]![Libelle] & ' : ' & [ActesParVisite]![quantite] AS Intervention FROM Ordonnances INNER JOIN (Actes INNER JOIN ActesParVisite ON Actes.CodeActe = ActesParVisite.CodeActe) ON Ordonnances.CodeOrdonnance = ActesParVisite.CodeOrdonnance WHERE Ordonnances.CodeOrdonnance = '" & CodeOrdonnance & "'"

[fevec]

Merci Kloun !

je viens également de trouver une autre possibilité avec CHR()

Code :

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

' SQL = "SELECT Ordonnances.CodeOrdonnance, [Actes]![Libelle] & chr(32) & chr(58) & chr(32) & [ActesParVisite]![quantite] AS Intervention FROM Ordonnances INNER JOIN (Actes INNER JOIN ActesParVisite ON Actes.CodeActe = ActesParVisite.CodeActe) ON Ordonnances.CodeOrdonnance = ActesParVisite.CodeOrdonnance WHERE Ordonnances.CodeOrdonnance = '" & CodeOrdonnance & "'"

Résolu