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