pepinio109
Nieuwe gebruiker
- Lid geworden
- 7 mrt 2012
- Berichten
- 1
Hallo,
Ik heb een vraagje, ik moet meerdere kolommen uit een access database tabel halen en die naast elkaar in één listbox zetten. Ze moeten allemaal in één listbox zodat het allemaal netjes naast elkaar blijft staan. Dit is de code die ik gebruik om dingen uit de database te halen:
Alleen hoe moet ik nu verder? Ik heb zelf namelijk geen flauw idee! Ik hoop dat iemand zo vriendelijk kan zijn om mij te helpen.
Ik heb een vraagje, ik moet meerdere kolommen uit een access database tabel halen en die naast elkaar in één listbox zetten. Ze moeten allemaal in één listbox zodat het allemaal netjes naast elkaar blijft staan. Dit is de code die ik gebruik om dingen uit de database te halen:
Code:
Imports System.Data.OleDb
Public Class frmOpvragen
Dim strSql As String = ""
Dim strConnectionString As String = ""
Private Sub btnSelect_Click() Handles btnSelect.Click
'Bepaal command tekst (SQL) en connectionstring:
strSql = "SELECT Artiest FROM BEHEER"
strConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=Database1.accdb"
'Maak connection aan op basis van de connectionstring en
'command op basis van de SQL opdracht en gemaakte connection:
Dim objConnection As New OleDbConnection(strConnectionString)
Dim objCommand As New OleDbCommand(strSql, objConnection)
'Open de verbinding:
objConnection.Open()
'Maak een DataReader aan op basis van de ingestelde command:
Dim objDataReader As OleDbDataReader = objCommand.ExecuteReader(CommandBehavior.CloseConnection)
'Doorloop alle records in de tabel:
While objDataReader.Read
lstUsername.Items.Add(objDataReader("Artiest"))
End While
'Sluit de DataReader en de Connection:
objDataReader.Close()
objConnection.Close()
End Sub
End Class
Alleen hoe moet ik nu verder? Ik heb zelf namelijk geen flauw idee! Ik hoop dat iemand zo vriendelijk kan zijn om mij te helpen.