salut
Voilà je réalise une appli en vb.net et sql sever 2005 , mon appli permet l'ajout , la modification, la suppression et la recherche .Cependant je suis bloqué dans la fonction de recherche , je veux entrer le nom, " "et le prenom
et ressortir les informations reliées à mon enregistrement recherché s'il existe sinon afficher un msg("innexistant") .Mon pb c'est que je ne sais pas comment chercher à partir de 2 critères nom et prenom .
Voilà mon code ça marche parfaitement en entrant juste le nom . Si quelqun sait comment je pourrai faire pour que ma recherche soit multi critères qu'il n'hesite pas à me repondre et merci de votre aide.
Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33 Dim NomRecherche As String Dim Matable As DataTable Matable = DS_cabinet.Tables("_tbPATIENT") 'cree un objet dataview pour filtrer les enregistrements Dim filtre As New DataView(Matable) Dim CountItem As Integer NomRecherche = InputBox("Veuillez entrer le nom recherché", "Recherche") If NomRecherche = "" Then MsgBox("veuillez entrer un nom à rechercher SVP") 'definition de notre table Else filtre.RowFilter = "nom like'*"& NomRecherche & "*'" CountItem = filtre.Count End If If CountItem > 0 Then txt_id.Text = filtre.Item(0)(0) txt_nom.Text = filtre.Item(0)(1) txt_prenom.Text = filtre.Item(0)(2) txt_s.Text = filtre.Item(0)(3) txt_a.Text = filtre.Item(0)(4) txt_p.Text = filtre.Item(0)(5) txt_adr.Text = filtre.Item(0)(6) txt_tel.Text = filtre.Item(0)(7) txt_m.Text = filtre.Item(0)(8) Else : MsgBox("Innexistant") End If End Sub
Partager