[VB6] Command dans Data Environnement

Bonjour

je fais un programme qui utilise un Data Environnment pour accéder à une base de données Access. Dans ma Connection1, j'ai un objet Command appelé Recherche. Le texte de la requête SQL du Command doit changer en fonction de critères choisis( c'est comme un mini-moteur de recherche). J'ai vu que cette propriété s'appelle CommandText. Dans mon prog, le texte de la requête est stocké dans une variable appelée SQL(original) et je veux pouvoir la changer. Voici ce que j'ai essayé:

Code:

---

DE.Commands("Recherche").CommandText = SQL

---

mon data environnment s'appelle DE
j'ai vérifié à l'exécution du prog, la valeur de SQL est bien le bon texte de la requête. Mais il y a une erreur: Invalid procedure call or argument. Et c'est l;a manière dont j'ai accédé au CommandText qui provoque une erreur.
Quelqu'un pourrait-il me dire comment changer cette propriété ?(peut-être un Set mais j'ai essayé!)
merci d'avance

cela devrait marcher. Vérifie que ta commande à bien adCmdText dans sa propriété CommandType.

Voila un exemple qui fonctionne

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Command1_Click() Dim SQL As String   SQL = "Select * From Titles" With DE.Commands("Recherche") .CommandText = SQL End With DE.rsRecherche.Open MsgBox DE.Recordsets(1).Fields(0).Value End Sub

---

On peut indifféremment passer pas rsRecherche ou par Recordsets(1)