Hvordan spare variabler til databaser ved å bruke Microsoft Visual Basic OLEDB

I Visual Basic, objektet linking og embedding, gjør database (OLE DB) programmeringsgrensesnitt du koble programmet til en database. Med det kan du lagre informasjon fra prosjektet til en tabell i databasen og bruke den i andre programmer. Du kan lage dine variabler hvor som helst i prosjektet, for eksempel fra tekstbokser, avmerkingsbokser eller liste valg, bare sørg for at ditt variabel datatype samsvarer med datatypen for feltet i databasen bord.

Bruksanvisning

1 Åpne Visual Basic og starte et nytt prosjekt. Åpne koden vinduet og lage en funksjon ved å skrive "Private Sub AddRecord ()".

2 Skriv inn følgende linjer for å lage variabler som vil koble til databasen:

Dim dbCon som ny OleDb.OleDbConnection
Dim datasett som ny DataSet
Dim dataAdap Som OleDb.OleDbDataAdapter
Dim SQLCommand As String

Den "dbCon" variabel oppretter en forbindelse til databasen, "datasett" inneholder data fra det, "dataAdap" utfører kommandoer og samhandler med databasen, og "SQLCommand" holder dine spørsmål.

3 Koble til databasen med følgende linjer:

dbCon.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = path_to_database"
dbCon.Open ()

Bytt ut "path_to_database" del med den fysiske plasseringen av databasen på datamaskinen. Denne linjen kobler Visual Basic program til databasen og den andre linjen åpner databasen.

4 Skriv inn følgende linjer for å laste inn data fra databasen:

SQLCommand = "SELECT * FROM tblContacts"
dataAdap = Ny OleDb.OleDbDataAdapter (SQLCommand, dbCon)
dataAdap.Fill (datasett, "Database")

Dine data adapter holder nå alle postene i tabellen. Du kan bruke et annet navn enn "Database" for å bedre identifisere tabellen. For eksempel, hvis tabellen inneholder kontaktinformasjon, kan du kalle dette "Kontakter".

5 Lag følgende variabler:

Dim comBuild som ny OleDb.OleDbCommandBuilder (dataAdap)
Dim dataNewRow Som DataRow

Den første linjen validerer et innstikk kommando i bordet når du bruker en DataRow. Den andre linjen skaper DataRow objekt.

6 Skriv inn følgende linjer for å legge til en ny rad i tabellen i databasen og lagre variabler til felt i posten:

dataNewRow = dataSet.Tables ( "Database"). NewRow ()
dataNewRow.Item (1) = variable1
dataNewRow.Item (2) = variable2
dataNewRow.Item ( "FIELD_NAME") = variable3
dataSet.Tables ( "Database"). Rows.Add (dataNewRow)
dataAdap.Update (datasett, "Database")

Den første linjen forbereder en ny rekord med tomme felt. De neste tre linjer legge inn informasjon. De to første bruke indeksnumrene til tabellfelt og sette inn disse variablene inn i første og andre felt i posten. Den tredje bruker feltnavn til å identifisere hvor feltet for å lagre den variabelen. Den femte og sjette linjer legge til posten med variablene i tabellen og forplikte dataene.

7 Skriv inn følgende linje for å lukke tilkoblingen til databasen:

dbCon.Close ()

Ring din "AddRecord ()" -funksjonen andre steder i koden, for eksempel i en knapp klikk hendelsen.