Hvordan bruke VB med SQLite

Som et programmeringsspråk, har Visual Basic evnen til å utvikle ekstremt robuste og lette applikasjoner. En av måtene som VB-applikasjoner kan holdes så lette som mulig og redusere totale CPU-belastning er å bruke SQLite, en database infrastruktur basert på MySQL som ofte brukes som en midlertidig cache fil i desktop-applikasjoner.

Bruksanvisning

1 Opprett en ny VB prosjekt ved å klikke på "File" og deretter navigere til "Ny Visual Basic" og deretter "Windows fra Application".

2 Opprett SQLite database ved å opprette en subrutine å generere selve databasen:

Private Sub btn_createdb_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Håndtak btn_createdb.Click

'Save Dialog Box

Dim f Som New SaveFileDialog

f.Filter = "SQLite 3 (* .db3) | * .db3 | Alle filer |"

f.ShowDialog ()

'Opprett database

Dim SQLConnect som ny SQLite.SQLiteConnection ()

'Database eksisterer ikke så Laget på Sti

SQLconnect.ConnectionString = "Data Source =" & f.FileName & ";"

SQLconnect.Open ()

SQLconnect.Close ()

End Sub

3 Opprett tabellene for databasen og navngi overskriftsraden.

4 Sette sammen resten av databasestrukturen ved å kjøre følgende VB rutine:

Dim f As New OpenFileDialog

f.Filter = "SQLite 3 (* .db3) | * .db3 | Alle filer | *. *"

Hvis f.ShowDialog () = DialogResult.OK Deretter

Dim SQLConnect som ny SQLite.SQLiteConnection ()

Dim SQLCommand Som SQLiteCommand

SQLconnect.ConnectionString = "Data Source =" & f.FileName & ";"

SQLconnect.Open ()

SQLCommand = SQLconnect.CreateCommand

'SQL-spørring for å lage tabellen

SQLcommand.CommandText = "CREATE TABLE foo (id INTEGER PRIMARY KEY AUTOINCREMENT, tittel TEKST, beskrivelse tekst, bilde BLOB);"

SQLcommand.ExecuteNonQuery ()

SQLcommand.Dispose ()

SQLconnect.Close ()

Slutt om