Hvordan kjører Access spørringer i Visual Basic

Å ha kunnskap til å utføre Microsoft Access-spørringer fra en Visual Basic.NET program kan hjelpe deg å gjøre søknaden din mer dynamisk. Access er en relasjonsdatabase styringssystem inkludert i Microsoft Office-pakken. Visual Basic.NET er et programmeringsspråk som brukes til å utvikle Windows-programmer og er relativt enkelt å bruke. Det er ofte nødvendig for å gjøre oppdateringer til en Access-database fra en Visual Basic-program basert på brukerundersøkelser. I noen få trinn kan du skrive Visual Basic-kode for å kjøre spørringer i Access.

Bruksanvisning

1 Start Microsoft Office Access og velg "Blank Database." Navn databasen "QueryTest" og klikk "Opprett".

2 Opprett et nytt bord og gi den navnet "Tabell1." På første rad Type "John" under "Felt1" og "Smith" under "Felt 2".

Legg til en annen rad ved å skrive "Jaime" under "Felt1" og "Gonzalez" under "Felt 2".

Lagre "Table1" og nær.

3 Start Microsoft Visual Basic 2010 Express og velg "New Project" under "Fil" -menyen. Velg "Windows Forms Application" og klikk "OK."

Klikk "Toolbox" på den venstre ruten av vinduet og dobbeltklikk på "knapp" for å legge til en knapp i skjemaet. Dobbeltklikk på "Button1" for å åpne "Form1.vb" modul, hvor du skriver koden.

4 Skriv "Import System.Data.OleDb" på toppen av "Form1.vb" modul.

Klikk i "Private Sub button1_click" for å begynne å skrive Visual Basic-kode.

5 Skriv inn følgende å erklære tilkoblings- og kommando variabler:

Dim myConnToAccess Som OleDbConnection

Dim mySQLCommand Som OleDbCommand

Dim mySQLStrg As String

6 Skriv inn følgende for å åpne en forbindelse til "QueryTest" Access database:

myConnToAccess = Ny OleDbConnection ( "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C: \ QueryTest.mdb;")

myConnToAccess.Open ()

Edit "Source = C: \ QueryTest.mdb" og skriv inn banen der du lagret Access database.

7 Skriv inn følgende for å utføre en "Slett" søk i databasen:

mySQLStrg = "SLETT Table1.Field1 FROM Tabell1 WHERE (((Table1.Field1) = 'John'));"

mySQLCommand = Ny OleDbCommand (mySQLStrg, myConnToAccess)

mySQLCommand.ExecuteNonQuery ()

Du vil slette posten der "Felt1" likeverdige "John".

Trykk "F5" for å kjøre programmet og klikk "Button1."