comment rechercher dans une base de données access avec ado

Question

allo tout le monde,
j'ai une application  visual basic 6.0  et je l'ai connect&#233; avec une base de donn&#233;es access en utilisant ado.j'aimerais rechercher des caracteres que je mets dans un champs text dans ma base de donn&#233;es et verifier si des donn&#233;es ont &#233;t&#233; trouv&#233; .  j'aimerais avoir un exemple tres detaill&#233; de ca parce que j'en ai jamais fait et c'est tres important pour moi..

voici ce que je fais mais cela ne marche pas:

Private Sub Command2_Click()
RsTBabonnementADO.Close
CmdTBabonnementADO.CommandText = "select noclient from abonnement where noclient like '*" & clients.Text1.Text & "*'"
'CmdTBabonnementADO.Execute
RsTBabonnementADO.Open CmdTBabonnementADO
MsgBox (RsTBabonnementADO!NOCLIENT)
'le message box me retourne 0

'j'ai aussi essaye avec find mais cela ne marche pas
'clients.RsTBabonnementADO.Find ("Text1.Text = clients.RsTBabonnementADO!NOCLIENT")
....

End Sub

cs_labout · Answer

clients.RsTBabonnementADO.Find ("NOLIENT=" & Text1.Text )  si c'est num&#233;rique
clients.RsTBabonnementADO.Find ("NOLIENT='" & Text1.Text ) &"'"  si c'est caract&#232;re

labout

cs_Jack · Answer

Et, sous SQL, remplace les * par des % :
... noclient like '%" & clients.Text1.Text & "%'"

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

Comment rechercher dans une base de données access avec ado

2 réponses

Discussions similaires