syntaxe findfirst et champ suiveur [Résolu]

[symbabeauchat]

Bonjour à tous
Je suis entrain de sécher sur la saintaxe de FindFirst

MA Table avec 3 champs:

Klé AutoNum
N°Classement Texte Indexé
Description Mémo RichTexte

un Formulaire qui m'affiche
les 3 Champs + Un champs Indépendant ChampRecherche

Je veux exécuter un FindFirst = ChampRecherche à chaque Changement dans la saisie Exemple : t m'affichera le premier t trouvé
puis o m'affichera le premier to ......etc

Voici mon code (je gérerai le NoMatch quand ma syntaxe de base marchera !)

Code :

1
2
3
4
5
Dim rst As Recordset
Set rst = Me.Recordset
    rst.FindFirst "[N°Classement]='" Like Me.ChampRecherche & "*" & "'"
    MsgBox Me.Description
End Sub

Message d'erreur retourné par ACCESS:
le moteur Acces ne reconnait pas Faux en tant que Nom de Champ ou Expression correcte
J'ai essayer toute sorte de syntaxe mais je ne trouve pas

Merci à ceux qui me donneront un coup de main
Bien cordialement

[fbtsra]

Bonjour,

Il y a une erreur de syntaxe, essayez avec :

Code :

1
2
3
4
5
Dim rst As Recordset
Set rst = Me.Recordset
    rst.FindFirst "[N°Classement] Like '" & Me.ChampRecherche & "*'"     
MsgBox Me.Description
End Sub

Bcdt

[marot_r]

Essaye avec cela, ça devrait résoudre le problème.

Code :

rst.FindFirst "[N°Classement] Like """ & Me.ChampRecherche & "*"""

A+

[marot_r]

fbtsra a été plus rapide que moi :-).

La différence entre nos deux solutions est mineure, elle porte sur le délimiteur de chaîne de caractère. Il utilise l'apostrophe, j'utilise le guillemet anglais.

Outre que le " est le 1er délimiteur que j'ai rencontré et que j'ai tendance a être casanier il a l'avantage de ne pas apparaître souvant dans les données et donc d'éviter que Acces voit la fin de ma chaîne avant la fin réelle : ex : J'ai faim avec " va être vu comme "J'ai faim" mais avec ' il va être vu comme "J" et le reste va probablement provoquer une erreur de syntaxe.

Note que ce problème se pose néanmoins rarement.

A+

[symbabeauchat]

MERCI à vous
ça marche TipTop