Discussion :

[masstor]

bonjour

je viens de créer une application de gestion administratif d'une agence commercial, cette application contient un formulaire de recherche, j'ai eu une erreure de compilation dans le code qui génère la recherche.

pouvez vous m'aider a réglé ce problème, merci d'avance

[hyperion13]

Salut,
Un conseil évitez d'utiliser dans le nommage de vos champs et objets des caractères accentués !
C'est une règle de base !

Code :

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

1
2
3
4
Dim strRowSource As String
strRowSource = "SELECT nature, [concerné], ... " _
        & " FROM [Evènement]" _
        & " WHERE [concerné] like '*" & Me.text_rech_event & "*'"

[masstor]

bonjour

merci pour le conseil , si vous avez un autre astuce qui va m'aider a résoudre ce problème.

merci

[binarygirl]

Dans votre cas de figure il manque le underscore (_) à la fin de la première ligne, qui indique que vos instructions se poursuivent sur la ligne qui suit.
En réalité, le problème commence déjà avant la zone mise en évidence au moment de la compilation. Les lignes qui apparaissent en rouge devraient vous mettre la puce à l'oreille, cela indique un problème de parsing pour votre environnement de développement.

[nico84]

Eviter les espaces dans les noms de champ est encore plus une règle de base !

Il manque aussi un espace devant le where, un espace devant le from et le symbole & pour concaténer les 2 lignes... et if dans

Code :

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

elseif cadre=4

Enfin, un petit

Code :

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

msgbox strRowSource

permet de vérifier que strRowSource contient bien une instruction sql valide en mode "test"