*** Recherche dans une table Acces numerique ***

cs_Heny Messages postés 125 Date d'inscription samedi 25 octobre 2003 Statut Membre Dernière intervention 19 avril 2007 - 23 nov. 2004 à 19:50
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 23 nov. 2004 à 22:05
Salut a tous

Je voudrai savoir comment je peut rechercher dans une colonne de type numérique dans une table Access mais par élimination c'est-à-dire si j'ai 1,2,5,8,9,4,12,15 dans la colonne et que l'utilisateur saisis 1 la liste deviens 1,12,15 ainsi de suite.
J'ai utilisé ce code mais ça ne marche pas comme je le veux

'Recherche par Numero If ((Not Trim(Text1(0).Text) "") And (CmbRech.ListIndex 0)) Then
AdoFilms.Recordset.Filter = "Numero LIKE '" & Trim(Text1(0).Text) & "'"
End If

Et merci pour de me répondre

4 réponses

cs_Benouille Messages postés 215 Date d'inscription jeudi 24 octobre 2002 Statut Membre Dernière intervention 7 septembre 2007
23 nov. 2004 à 19:58
j'ai pas bien compris ton probleme, mais à mon avis la solution ne passeras pas par une conversion en texte ...
d'ailleurs si j'ai pigé c'est meme de la que vient ton bleme

Benouille la grenouille :approve)
0
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 21
23 nov. 2004 à 20:29
Salut,

Je ne comprend peut-être pas tout mais si ton champ 'Numero' est en numérique, je ne pense pas que "Numero LIKE '" & Trim(Text1(0).Text) & "'" fonctionne correctement. Pour ça, il faudrait que ton champ 'Numero' soit de type texte.

J'ai peut-être une autre solution, je teste et je te poste le résultat.

Cordialement, CanisLupus
0
cs_Benouille Messages postés 215 Date d'inscription jeudi 24 octobre 2002 Statut Membre Dernière intervention 7 septembre 2007
23 nov. 2004 à 21:09
il est fort ce canis lupus!
Benouille la grenouille :approve)
0
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 21
23 nov. 2004 à 22:05
Oups, j'ai failli oublier (soirée mouvementée). Si ton champ de BDD est en numerique et que tu ne veux pas le mettre en texte (ce qui se comprend) alors essaie ça :

AdoFilms.Recordset.Filter = "Cstr(Numero) LIKE '" & Trim(Text1(0).Text) & "*'"

à la place de ton :

AdoFilms.Recordset.Filter = "Numero LIKE '" & Trim(Text1(0).Text) & "'"

Ca devrait le faire, sinon dis ce qui ne marche pas.

Cordialement, CanisLupus
0
Rejoignez-nous