Discussion :

[GuyDuLac]

Bonjour,

J'ai une erreur me disant qu'un opérateur est manquant et je ne vois pas ce que ça peut être

Code :

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

1
2
3
4
5
Private Sub Form_Activate()
Dim Qui As String
Qui = Environ("username")
Me.LstNom = Nz(DLookup("[LogID]", "TblLoginBellus", "[LogUtilisateur] = " & Qui), 0)
End Sub

merci à l'avance

[Beub']

Bonjour Guy,

Access attend des simples quotes autour des variables de type String...

Code :

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

1
2
 
Me.LstNom = Nz(DLookup("[LogID]", "TblLoginBellus", "[LogUtilisateur] = '" & Qui & "'"), 0)

ça devrait mieux marcher comme cela !

Cordialement,
Beub'.

[loufab]

Bonjour,

Attention Beub' dans le cas de ton pseudo ça ne fonctionnera pas.

Il vaut mieux mettre des doubles cote comme ceci :

Code :

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

Me.LstNom = Nz(DLookup("[LogID]", "TblLoginBellus", "[LogUtilisateur] = """ & Qui & """"), 0)

Cordialement,

[GuyDuLac]

merci Beub ça fonctionne parfaitement

[GuyDuLac]

Bonjour Loufab

Que veux-tu dire par Pseudo?

[Beub']

Loufab,

Ah oui tout à fait, ça me semblait tellement évident que je n'ai pas fait réfléchi. La meilleure solution est la tienne !

Cordialement,
Beub'.

[loufab]

Bonjour Loufab

Que veux-tu dire par Pseudo?

Bonjour,

Les fonctions de domaines fonctionnent comme des requêtes (c'est ce qu'elles construisent lorsqu'elles sont utilisées).

Donc quand tu codes :

Code :

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

DLookup("[LogID]", "TblLoginBellus", "[LogUtilisateur] = '" & Qui & "'")

Le moteur Jet envoi exécutes ceci :

Code :

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

SELECT LogID FROM TblLoginBellus WHERE  [LogUtilisateur] = 'mavaleur'

Si tu envois le pseudo de beub' tu recevras une erreur parce que :

Code :

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

SELECT LogID FROM TblLoginBellus WHERE  [LogUtilisateur] = 'mavaleur''

Avec un autre exemple c'est encore plus parlant :

Code :

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

SELECT LogID FROM TblLoginBellus WHERE  [LogUtilisateur] = 'L'ami de la belle province'

"ami de la belle province" lèvera une erreur puisque non interprétable par SQL.

Cordialement,