Discussion :

[destroyer971]

Bonjour,

Code :

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

1
2
3
4
5
6
Private Sub lstResults_Click()
 
Me.LstBadge.RowSource = "SELECT badges.numbadge FROM BADGES Where badges.matricule=lstResults.Column(12)"
Me.LstBadge.Requery
 
End Sub

ce code ci dessus ne me renvoie rien
alors que si je met en dur un matricule cela me renvoie bien l'info.
voir ci dessous..

Code :

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

Me.LstBadge.RowSource = "SELECT badges.numbadge FROM BADGES Where badges.matricule='014484'"

quel serait la bonne syntaxe?

[nico84]

Bonjour,

Un petit

Code :

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

msgbox Me.LstBadge.RowSource

permettrait de voir d'où vient le problème... Il faut écrire :

Code :

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

Me.LstBadge.RowSource = "SELECT badges.numbadge FROM BADGES Where badges.matricule='" & lstResults.Column(12) & "'"

[destroyer971]

Bonjour,

Un petit

Code :

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

msgbox Me.LstBadge.RowSource

permettrait de voir d'où vient le problème... Il faut écrire :

Code :

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

Me.LstBadge.RowSource = "SELECT badges.numbadge FROM BADGES Where badges.matricule='" & lstResults.Column(12) & "'"

C'est la solution merci pour la réponse rapide..