Discussion :

[monphp]

Bonjour tt le monde,

je voudrai savoir , comment on fait au moment où je saisi une lettre quelquonque commençant par a ou par z et ensuite je clique sur le bouton rechercher qui m'affiche les noms commençant par la lettre saisi dans txtNom de l'objet TextBox et le lier à lstresultat de l'objet liste deroulante
pour le moment je peux juste afficher les noms commençant par 'a' à condition que
je précise à l'avance ma lettre et sans saisir cette lettre dans le txtNom
merci d'anvance

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub cmdRechercher_Click()
Dim val As String
 
strSql = "SELECT *" _
& " FROM Patient " _
& "WHERE PAT_NOM like 'a*' "
 
Me.Lstresultat.RowSource = strSql
Me.Lstresultat.Requery
 
End Sub

[Mahefasoa]

Bonjour,

Private Sub cmdRechercher_Click()
Dim strSql As String

strSql = "SELECT *" _
& " FROM Patient " _
& "WHERE PAT_NOM like 'a*' "

Me.Lstresultat.RowSource = strSql
Me.Lstresultat.Requery

End Sub

Voici le code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub cmdRechercher_Click()
 Dim strSql As String
 
 strSql = "SELECT * " & _
 "FROM Patient " & _
 "WHERE PAT_NOM like '" & nz(Me.txtNom,"") & "*';"
 
 Me.Lstresultat.RowSource = strSql
 Me.Lstresultat.Requery
 
End Sub

Me.txtNom est la zone de texte contenant le(s) caractère(s) de début.
J'utilise nz ici, pour éviter de renvoyer une valeur NULL et si tel est le cas, cela renvoie une chaîne vide et de ce fait c'est * qui sera choisi (ie tout).
Bon courage et @+

[monphp]

merci Mahefasoa de m'avoir expliquer, c'est justement le methode Nz() qui me manqué pour accomplir cette tâche et merci encore