Discussion :

[nemog]

Bonjour,

Je me permets de poster ici, car je n'ai trouvé aucune info ailleurs

Dans ma base Access, je veux pouvoir faire des recherches en remplissant certains champs d'un formulaire
Je voudrais pouvoir faire XX* pour trouver tout ce qui commence par XX
et *XX pour trouver tout ce qui se termine par XX

Dans mon ancienne base (créée sous Access2003) il suffisait de taper "XX*" dans le champ du formulaire pour que ça marche
Dans celle-ci (Access2010), la requête cherche "XX*" au lieu de "XX....et peu importe la suite....."

J'ai cherché dans tous les paramètres (champ, formulaires, options générales de la base) pourquoi il considère "*" comme un simple caractère, sans rien trouver.
Je me suis assuré que ANSI92 n'était pas sélectionné pour garder ANSI89

J'espère que j'ai été à peu près clair,

merci de votre aide

[tee_grandbois]

bonjour,

Je me suis assuré que ANSI92 n'était pas sélectionné pour garder ANSI89

si tu n'as jamais coché l'option, je ne vois aucune raison pour que ça ne fonctionne pas, mais je n'ai pas la base à disposition pour le vérifier vraiment. Pourrais-tu poster le code SQL d'au moins un des formulaires ?

[Zekraoui_Jakani]

J'ai déjà utilisé des expressions comme :

Code :

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

1
2
3
4
 
Me.Filter = "[VotreChamp] Like '*" & XX & "*' "  'Je suppose que votre champ est du type "String".
Me.Filter = "[VotreChamp] Like '*" & XX & "' "
Me.Filter = "[VotreChamp] Like '" & XX & "*' "

[nemog]

Merci pour les suggestions mais je ne pense pas que ce soit un pb de code
Ça marchait dans l'ancienne base et plus dans la nouvelle avec un sql aussi simple que ça :

Code SQL :

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

1
2
3
SELECT TabGEN.Affectation
FROM TabGEN
WHERE (((TabGEN.Affectation) Like [Formulaires]![FormConsultGEN]![Affectation2F]));

ou avec un code basique du style :

Code :

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

DoCmd.OpenForm "FormGen", , , "affectation like [forms]![formconsultGEN]![Affectation2f]"

FormGen étant lié à TabGEN

[nemog]

Bon, j'ai trouvé (et je n'avais pas tout dit)
C'est sûrement c.., mais j'explique quand même :

Affectation2F est le champ où je tape ma demande (ex abc*, ou *abc, ou *abc*)

*******************************************************

1er code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Affectation2F_AfterUpdate()

Dim z As Integer
z = DCount("affectation", "ReqExistAffectation")


If z = 0 Then
    
   MsgBox "Aucune fiche trouvée.", vbOKOnly, "Inexistant"
   Me.Affectation2F.SetFocus
   Exit Sub

End If

DoCmd.OpenForm "FormGen", , , "affectation like [forms]![formconsultGEN]![Affectation2f]"

End Sub

*******************************************************************************

Je voulais tester la validité de la saisie et n'ouvrir le form suivant QUE s'il y avait qque chose à afficher.
Or c'est la requête, qui veut une valeur exacte, qui provoquait la fin de l' évènement.

J'ai changé mon fusil d'épaule et mis ce code :

*******************************************************************************

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Affectation2F_AfterUpdate()
 
DoCmd.OpenForm "FormGen", , , "affectation like [forms]![formconsultGEN]![Affectation2f]"
 
If IsNull(Forms!formgen!Affectation) Then
 
DoCmd.Close
 
MsgBox "rien", vbOKOnly
 
 End If
 
 
End Sub

*******************************************************************************

Là, j'ouvre le form suivant et le referme aussitôt (on ne voit rien à l’écran, ça va très vite) si le champ affectation est vide.


Il y a sûrement une manière plus élégante, mais là, c'est simple et ça marche !
Je peux mettre "*abc*" dans ma demande et il m'ouvre tous les enregistrements où le champ concerné contient abc

Merci à ceux qui se sont penché sur mon pb