Recherche dans une listview

Version imprimable

Bonjour,

J'utilise une base de donnée Mysql
Je fais des recherches dans une listView en utilisant un richTextBox
Mais le soucis c'est que si je ne m'ai pas le mot exacte de ce que je veux rechercher il me le trouve pas, par exemple si je m'ai "JU" pour rechercher "JULIEN" il me le trouve pas.
Merci d'avance pour votre aide :)

Code:

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
34
35
36
 
Sub Recherche(ByVal cmd_valeur)
 
 
        Dim cmd As New MySqlCommand(cmd_valeur, sConnection)
        Using L As MySqlDataReader = cmd.ExecuteReader()
            While L.Read()
                Dim Datee As String = L("BDDDate")
                Dim Nom As String = L("BDDNom")
                Dim Poste As String = L("BDDPoste")
                Dim Rapport As String = L("BDDRapport")
                ListView1.Items.Add(New ListViewItem(New String() {Datee, Nom, Poste, Rapport}))
            End While
 
        End Using
 
    End Sub
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
 
        Dim index1 As Integer = ComboBox3.SelectedIndex
 
        If (index1 = 1) Then
            Dim Valeur As String = txtSearch.Text
            Dim cmd As String = "SELECT * FROM  rapport_automaticien WHERE BDDNom='" & Valeur & "'"
            Recherche(cmd)
        Else
            If (index1 = 2) Then
                Dim Valeur As String = txtSearch.Text
                Dim cmd As String = "SELECT * FROM  rapport_automaticien WHERE BDDPoste='" & Valeur & "'"
                Recherche(cmd)
 
            End If
        End If
 
    End Sub

Bonjour,

Voici un exemple pour rechercher dans listview un mot :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim searchText = Me.TextBox1.Text
        If searchText = String.Empty Then
            MessageBox.Show("Veuillez entrer un texte pour rechercher.")
        Else
            ListView1.SelectedIndices.Clear()
            For Each lvi As ListViewItem In ListView1.Items
                For Each lviSub As ListViewItem.ListViewSubItem In lvi.SubItems
                    If lviSub.Text = searchText Then
                        ListView1.SelectedIndices.Add(lvi.Index)
                        Exit For
                    End If
                Next
            Next
            ListView1.Focus()
        End If
    End Sub

cordialement,

Merci pour ta réponse j'ai essayé ton programme
Mais ça fonctionne pas

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
  ElseIf (index1 = 2) Then
 
            Dim Valeur As String = txtSearch.Text
            Dim cmd As String = "SELECT * FROM  rapport_électriciens WHERE BDDPoste='" & Valeur & "'"
            If Valeur = String.Empty Then
                MessageBox.Show("Veuillez entrer un texte pour rechercher.")
            Else
                ListView1.SelectedIndices.Clear()
                For Each lvi As ListViewItem In ListView1.Items
                    For Each lviSub As ListViewItem.ListViewSubItem In lvi.SubItems
                        If lviSub.Text = Valeur Then
                            ListView1.SelectedIndices.Add(lvi.Index)
                            Exit For
                        End If
                    Next
                Next
                ListView1.Focus()
            End If

22/01/2018, 13h11
Miska59

Bonjour,

j'ai moi ça fonctionne pour rechercher un valeur ou un texte dans listview.
on sinon regarder ce lien vous avez un exemple comment rechercher avec des données Mysql :
le lien :https://stackoverflow.com/questions/...listview-in-vb

Cordialement,

Citation:
Envoyé par juliendu67117
Code:

1 2 Dim cmd As String = "SELECT * FROM rapport_automaticien WHERE BDDNom like %'" & Valeur & "'%"
Quelque chose comme ça serait mieux?

22/01/2018, 14h11
juliendu67117

merci pour ta réponse ça fonctionne :)