Discussion :

[Le Sage]

Bonjour, et bonne année à toutes et tous !

Je me trouve dans une situation bizarre, et j'espère que vous saurez m'aiguiller :

J crée une fonction de vérification de correspondance avec un masque :

Code :

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

1
2
3
4
 
Public Function MasqueOk(ByVal Chaine As String) As Boolean
    MasqueOk = Chaine Like "[A-Z]"
End Function

Puis je teste dans la fenêtre de débogage :

Code :

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

1
2
3
4
5
 
?MasqueOk("A")
Vrai
?MasqueOk("a")
Vrai

L'opérateur LIKE n'est-il pas censé être sensible à la casse ???

Alors j'ai pu obtenir cette sensibilité à la casse avec Option Compare Binary en tête de module, mais je voulais savoir s'il existait un autre moyen que d'impacter tout un module pour une seule fonction...

Merci d'avance pour vos réponses éclairées !

[micniv]

Bonjour,
si tu veux comparer en tenant compte de la casse, tu peux aussi utiliser la fonction StrComp :

Code :

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

 strcomp("titi", "TiTI",vbBinaryCompare) ' retourne 0 si les chaines sont égales , voir l'aide Access

Cdlt

[marot_r]

Bonjour.

Par défaut en VBA et en SQL, Access n'est pas sensible à la case.

On peut lui forcer la main dans un module avec :

Code :

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

Option Compare Binary

en tête de module.

Je ne connais pas de moyen de le faire en SQL.

A+

[Le Sage]

Bonjour,
si tu veux comparer en tenant compte de la casse, tu peux aussi utiliser la fonction StrComp :

Code :

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

 strcomp("titi", "TiTI",vbBinaryCompare) ' retourne 0 si les chaines sont égales , voir l'aide Access

Cdlt

Bonjour, et merci pour ta réponse rapide, mais en fait j'ai simplifié le code pour ne mettre en évidence le problème rencontré.

Je ne veux pas comparer deux textes, mais un texte avec un masque, et strComp ne le permet pas, au contraire de LIKE.

Merci quand même, et bonne continuation !

[Le Sage]

Bonjour.

Par défaut en VBA et en SQL, Access n'est pas sensible à la case.

On peut lui forcer la main dans un module avec :

Code :

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

Option Compare Binary

en tête de module.

Je ne connais pas de moyen de le faire en SQL.

A+

Bonjour, et merci pour ta réponse.

C'est ce que je me suis résolu à faire...

Bonne continuation !