listview updaten via query

Status
Niet open voor verdere reacties.

querymaster

Nieuwe gebruiker
Lid geworden
21 dec 2012
Berichten
3
Hallo allemaal,

Ik wil iets maken zoals op google.com & imdb.com.
Waar het dan in het specifiek over gaat is de zoekbalk, als je iets intypt dan krijgt je alvast een lijstje dat overkomt met die naam.

Dit wil ik dus namaken in Visual basic.
Ik heb echt GEEN idee hoe ik het moet maken zoals bij google of bij imdb dus ik dacht laat ik het met een listview doen.

De query die ik gebruik:

[CPP] adapter.SelectCommand = New MySqlCommand("select * from medicijn where naam LIKE '% " & Searchbox.Text.ToLower & "%' ", myconnection)[/CPP]

Ik heb die dus staan onder een keypress, en keydown event maar geen van beide werken (en retourneren een lege listview)

Dit is de gehele code:

[CPP]
If Searchbox.Text.Length > 0 Then
Try
Dim adapter As New MySqlDataAdapter()
adapter.SelectCommand = New MySqlCommand("select * from contacten where naam LIKE '% " & Searchbox.Text.ToLower & "%' ", myconn)
Dim mydatatable As New DataTable
adapter.Fill(mydatatable)
ListViewInfo.Items.Clear()
For ii = 0 To mydatatable.Rows.Count - 1
Dim group As String = mydatatable.Rows(ii).Item("Naam").ToUpper.Substring(0, 1)
Dim lvi = New ListViewItem(New String() {mydatatable.Rows(ii).Item("Naam"), mydatatable.Rows(ii).Item("adres")}, ListViewInfo.Groups.Item(group))
ListViewInfo.Items.Add(lvi)

Next
Catch ex As Exception

End Try
else
loadfulllist()
End If

[/CPP]

PS: De data wordt uit een mysql database gehaald, maar als iemand code heeft om het te doen met een al gevulde listivew (met standaard items) dan kan ik de code zelf wel omzetten om te werken met de database (dan hoeft de query ook niet gebruikt te worden)
 
Als je even doorleest zie je ook een voorbeeld voor een ListView.
 
De laatste code die ik zie, en ook alle daarvoor (behalve die van luuknl, maar die werkt niet) werken met een listbox.

Hoe gebruik ik hier beneden dan een listview?
[CPP]Public Class Form1

Dim ItemLijst As New List(Of String)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
For Each item As String In ListBox1.Items
ItemLijst.Add(item)
Next
End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
ListBox1.Items.Clear()
For Each item As String In ItemLijst
If item.Contains(TextBox1.Text) Then
ListBox1.Items.Add(item)
End If
Next
End Sub
End Class[/CPP]

Alvast bedankt, en een fijne kerst.
 
Dan heb je niet goed gekeken (post #13 en #14).

[CPP]Public Class Form1
Private Personen As New List(Of ListViewItem)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ListView1.Items.Add(New ListViewItem(New String() {"Henk", "Janssen", "Ver weg"}))
ListView1.Items.Add(New ListViewItem(New String() {"Brian", "Kaarte", "Dichtbij"}))
ListView1.Items.Add(New ListViewItem(New String() {"Mike", "Wichern", "Amsterdam"}))
For Each item As ListViewItem In ListView1.Items
Personen.Add(item)
Next
End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
ListView1.Items.Clear()
For Each item As ListViewItem In Personen
If item.Text.Contains(TextBox1.Text) Or item.SubItems(1).Text.Contains(TextBox1.Text) Or _
item.SubItems(2).Text.Contains(TextBox1.Text) Then ListView1.Items.Add(item)
Next
End Sub
End Class[/CPP]

Fijne kerst!
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan