Hvordan bruke en VB til Call tilgang til en spørring

Å vite hvordan å spørre en Access-database tabellen ved hjelp av Microsoft Visual Basic.NET kan gjøre Windows-program mer dynamisk. Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. VB.NET er et programmeringsspråk som brukes til å lage Windows-programmer. I noen få trinn kan du opprette en VB.NET program for å få tilgang til Northwind database som følger med MS Office og spørre kundene tabellen.

Bruksanvisning

1 Åpne Microsoft Visual Basic Express og klikk "New Project ..." på ruten til venstre på skjermen. Dobbeltklikk på "Console Application".

2 Skriv inn følgende i den aller første linje av "Module1.vb":

importen System.Data.OleDb

3 Skriv inn følgende under "Sub main ()" for å erklære variabler:

Dim conn Som OleDbConnection

Dim strSQL As String

Dim ds Som datasett

Dim tmpStr As String

4 Skriv inn følgende for å opprette en ny utvalgsspørring for å søke på "Kunder" tabellen:

strSQL = "SELECT Customers.* FROM Customers;"

conn = Ny OleDbConnection _

( "Provider = Microsoft.ACE.OLEDB.12.0; Data Source = F: \ DemandStudios \ Arkiv \ North 2007.accdb;")

5 Skriv inn følgende for å opprette en ny tilkobling til databasen:

Dim myConnection As OleDbConnection = New OleDbConnection

Dim da Som OleDbDataAdapter

da = Ny OleDbDataAdapter (strSQL, conn)

ds = nytt datasett

6 Skriv inn følgende å sløyfe gjennom alle postene som returneres av søket og lagre dem til en streng variabel:

da.Fill(ds, "Customers")

For hver rowCust I ds.Tables ( "kunder"). Rows

tmpStr = tmpStr & rowCust ( "Selskapet") toString () og. "|"

tmpStr = tmpStr & rowCust ( "Last Name") toString () og. "|"

tmpStr = tmpStr & rowCust ( "fornavn") toString () og. "|" & vbLf

neste

7 Skriv inn følgende for å sende resultatene til konsollvinduet:

System.Console.Write (tmpStr)

MsgBox ( "Ferdig!")

8 Skriv inn følgende for å lukke databasetilkobling:

myConnection.Close()

Trykk "F5" for å kjøre programmet.