Ich verwende folgenden Beispielcode um auf eine SQLite Datenbank zuzugreifen. Nun möchte ich gerne wissen, gibt es noch eine andere Möglichkeit zum Lesen der Inhalte aus der Datenbank. Momentan verwende ich die mit myReader.Read()
VB.NET-Quellcode
- Imports System.Data.SQLite
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- 'SQLite deklarieren
- Dim myConnection As New SQLiteConnection("Data Source=D:\DeineDatenbank.sqlite;Version=3")
- Dim myCommand As New SQLiteCommand
- Dim myAdapter As New SQLiteDataAdapter
- Dim myData As New DataTable
- Dim myReader As SQLiteDataReader
- 'Datenbank inklusive Tabelle erstellen.
- myConnection.Open() 'Connection öffnen
- myCommand = New SQLiteCommand("CREATE TABLE Tabelle (Anrede CHAR(255), Vorname CHAR(255), Nachname CHAR(255))", myConnection) 'Command festlegen
- myCommand.ExecuteNonQuery() 'Command ausführen
- myConnection.Close() 'Connection schliesen
- ''Daten in die Datenbank Hinzufügen
- myConnection.Open() 'Connection öffnen
- myCommand = New SQLiteCommand("INSERT INTO Tabelle (Anrede, Vorname, Nachname) VALUES (@Anrede, @Vorname, @Nachname)", myConnection) 'Comand festlegen
- ''Parameter für das Speichern
- myCommand.Parameters.AddWithValue("@Anrede", ComboBoxAnrede.Text)
- myCommand.Parameters.AddWithValue("@Vorname", TextboxVorname.Text)
- myCommand.Parameters.AddWithValue("@Nachname", TextboxNachname.Text)
- myCommand.ExecuteNonQuery() 'Command ausführen
- myConnection.Close() 'Connection schliesen
- 'Daten aus der Datenbank lesen
- Methode 1: mit dem DataTable
- myData.Clear() 'DataTable löschen
- myConnection.Open() 'Connection öffnen
- myCommand = New SQLiteCommand("SELECT * FROM Tabelle", myConnection) 'Command festlegen
- myAdapter.SelectCommand = myCommand 'Command an Adapter übergeben
- myAdapter.Fill(myData) 'DataTable füllen
- DataGridView1.DataSource = myData 'DataGridView mit Daten von DataTable füllen
- myConnection.Close() 'Connection schliesen
- 'Methode 2: mit dem DataReader
- myConnection.Open() 'Connection öffnen
- myCommand = New SQLiteCommand("SELECT * FROM Tabelle", myConnection) 'Command festlegen
- myReader = myCommand.ExecuteReader 'Command ausführen
- Do While myReader.Read() 'Jede Reihe durchlaufen
- ComboBox1.Items.Add(myReader("Anrede")) 'In ComboBox laden
- Loop
- myReader.Close() 'Reader schliesen
- myConnection.Close() 'Connection schliesen
- End Sub
- End Class