Discussion :

[apprenti46]

Bonjour à tous,

Après une soirée à tester toutes les solutions, je viens demander des solutions à d'autres car moi je vais dormir...pas bien car je vais encore y penser..

Je travaille actuellement sur un projet ACCESS (ADP) avec SQLSERVER2005.

Dans un évènement click d'un bouton, je dois lancer une simple requête de contrôle mais dans le WHERE doivent passer des données de type : BRUXELLES (Braine-l'Alleud).
Lorsque je l'exécute, j'obtiens un message d'erreur avec la mention "Nom de colonne non valide: "BRUXELLES (Braine-l'Alleud)" ".

J'ai cru que le problème venait de l'apostrophe mais après avoir essayé beaucoup de chose, je me demande si le problème ne vient pas des parenthèses mais là, je n'ai pas d'idée.

Que me conseillez-vous?
Merci.

Voici mon code:

Code :

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

1
2
 
strSQL = "SELECT * FROM T_TAXATION_Archive WHERE (exercice = " & Me.txtEXERCICE.Value & ") AND (type = " & Me.chxTYPE.Value & ") AND (ent = """ & Me.lstPRO_ENT.Column(1) & """);"

Voici le debug.print obtenu:

Code :

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

1
2
 
SELECT * FROM T_TAXATION_Archive WHERE (exercice = 2011) AND (type = 1) AND (ent = "BRUXELLES (Braine-l'Alleud)");

[cbleas]

Bonjour,
essai cela

Code :

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

SELECT * FROM T_TAXATION_Archive WHERE (exercice = 2011) AND (type = 1) AND (ent = 'BRUXELLES (Braine-l''Alleud)');

[ClaudeLELOUP]

Bonjour,

Je travaille actuellement sur un projet ACCESS (ADP) avec SQLSERVER2005.

J'ignore ce que celà implique de particulier.

En tout cas, j'ai testé ton code avec Access2000 et ton code est correct.

[apprenti46]

Merci pour votre aide.

J'ai avancé ce matin grâce à votre aide: le problème principal provient des parenthèses???

En effet, j'ai testé la solution de cbleas: remplacer le simple apostrophe par un double apostrophe

Avec en plus un replace des parenthèses par des tirets et cela fonctionne....j'ai donc la cause du problème mais pas de solution qui me convienne.

Quelqu'un aurait-il une idée??

strENT_PRO = Replace(Me.lstPRO_ENT.Column(1), "(", "-")
strENT_PRO = Replace(strENT_PRO, ")", "-")
strSQL = "SELECT * FROM T_TAXATION_Archive WHERE (exercice = " & Me.txtEXERCICE.Value & ") AND (type = " & Me.chxTYPE.Value & ") AND ent = '" & Replace(strENT_PRO, "'", "''") & "'"

[cbleas]

peut être en doublant les parenthèses

[apprenti46]

Sorry, j'ai testé à nouveau et maintenant cela fonctionne même sans "chipotage" avec les parenthèses.

Voici le code:

strENT_PRO = Me.lstPRO_ENT.Column(1)
strSQL = "SELECT * FROM T_TAXATION_Archive WHERE (exercice = " & Me.txtEXERCICE.Value & ") AND (type = " & Me.chxTYPE.Value & ") AND ent = '" & Replace(strENT_PRO, "'", "''") & "'"

A bientôt.

Fred.