hjelp både Visual Basic.NET og Microsoft Access kan hjelpe deg å bygge en kraftig program ved å lagre informasjon i en database . VB.NET er et programmeringsspråk som bruker Microsoft. NET rammeverket . . NET Framework er en programmering modell for å bygge desktop , web og mobile applikasjoner. Microsoft Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. Lagring av data i en Access database gir deg fordelen av spørring data raskt ved hjelp av SQL-setninger fra din VB.NET programmet . Opprette en database
p Hvis du planlegger å bruke en Access database i VB.NET program, er det første du må gjøre er å lage en Access database . I VB.NET Microsoft Jet OLE DB Provider brukes til å opprette en Access database. Denne leverandøren er en COM-objektet , og må legges til som en referanse i prosjektet før det kan brukes . Selve navnet på objektet er "Microsoft ADO Ext. .
for DDL og sikkerhet . "
Making Database Connection
å lagre data til en Access database fra din VB.NET program, må du gjøre en database tilkobling. Den " OdbcConnnection " objekt blir brukt til å skape en entydig forbindelse i databasen ved å bruke en forbindelse streng. Den andre tilkoblingen alternativ er å bruke " OleDbConnection " objekt .
SQL-setninger
SQL-setninger er en viktig del når du bruker en Access database fra VB. NET . Disse uttalelsene gjør at du kan legge til, endre og hente data fra databasen. Den " INSERT INTO " statement lar deg sette inn data til databasen tabeller i Access. "Oppdater " SQL setningen kan du endre data i en tabell . Den mest brukte SQL-setning er " SELECT " statement. Denne uttalelsen brukes til å hente data fra databasen
VB.NET Eksempel
Følgende eksempel kan brukes til å opprette en Access- database: . Dim cat Som Catalog = New Catalog ( ) cat.Create ( " Provider = Microsoft.Jet.OLEDB.4.0 ; " & _ "Data Source = D: \\ AccessDB \\ NewMDB.mdb ; " & _ " Jet OLEDB : Motortype = 5 ")
eksempelet nedenfor brukes til å sette inn data i tabellen Kunder med OdbcConnection objekt: Private Sub InsertRow ( ByVal ConnectionString As String ) Dim spørrestrengsamling As String = _" INSERT INTO Kunder ( CustomerID , CompanyName ) verdier ( ' NWIND ' , ' Northwind Traders' ) " Dim -kommandoen som ny OdbcCommand ( spørrestrengsamling ) Bruke tilkobling som ny OdbcConnection ( ConnectionString ) command.Connection = connectionconnection.Open ( ) command.ExecuteNonQuery ( ) End UsingEnd Sub
