Sådan kører Access Forespørgsler på Visual Basic

March 12

Sådan kører Access Forespørgsler på Visual Basic


At have viden til at udføre Microsoft Access forespørgsler fra en Visual Basic.NET program kan hjælpe dig med at gøre din ansøgning mere dynamisk. Access er en relationel database management system inkluderet i Microsoft Office-pakken. Visuel Basic.NET er et programmeringssprog anvendes til at udvikle Windows-applikationer og er relativt let at bruge. Det er ofte nødvendige for at gøre opdateringer til en Access-database fra en Visual Basic-program baseret på brugerinput. I et par trin, kan du skrive Visual Basic-kode til at køre forespørgsler i Access.

Instruktioner

1 Start Microsoft Office Access og vælg "Tom database". Navngiv databasen "QueryTest" og klik på "Opret".

2 Opret en ny tabel og navngive det "Tabel1." På den første række Type "John" under "Felt1" og "Smith" under "Felt2."

Tilføj en række ved at skrive "Jaime" under "Felt1" og "Gonzalez" under "Felt2."

Gem "Tabel1" og lukke.

3 Start Microsoft Visual Basic 2010 Express og vælg "Nyt projekt" under menuen "Filer". Vælg "Windows Forms Application" og klik på "OK".

Klik på "Toolbox" i venstre rude i dit vindue, og dobbeltklik på "Button" for at tilføje en knap til formularen. Dobbeltklik på "Button1" for at åbne "Form1.vb" modul, hvor du vil skrive din kode.

4 Skriv "Import System.Data.OleDb" på toppen af ​​din "Form1.vb" modul.

Klik inde i "Private Sub Button1_Click" for at begynde at skrive din Visual Basic-kode.

5 Skriv følgende at erklære din forbindelse og kommando variabler:

Dim myConnToAccess Som OleDbConnection

Dim mySQLCommand Som OleDbCommand

Dim mySQLStrg As String

6 Skriv følgende for at åbne en forbindelse til din "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 indtast stien hvor du har gemt din Access-database.

7 Skriv følgende for at udføre en "Slet" forespørgsel i din database:

mySQLStrg = "SLET Table1.Field1 FROM Tabel1 WHERE (((Table1.Field1) = 'John'));"

mySQLCommand = Ny OleDbCommand (mySQLStrg, myConnToAccess)

mySQLCommand.ExecuteNonQuery ()

Du vil slette posten hvor "Felt1" lig med "John".

Tryk på "F5" for at køre dit program og klik på "Button1."


relaterede artikler