Att ha kunskap att utföra Microsoft Access förfrågningar från ett Visual Basic. NET applikation kan hjälpa dig att göra din ansökan mer dynamisk . Access är en relationsdatabas som ingår i Microsoft Office-paketet. Visual Basic. NET är ett programmeringsspråk som används för att utveckla Windows-program och är relativt lätt att använda . Det är ofta behövs för att göra uppdateringar av en Access- databas från ett Visual Basic-program baserat på användarens input . I några få steg kan du skriva Visual Basic -kod för att köra frågor i Access .
1 .
Starta Microsoft Office Access och välj " tom databas . " Namn databasen " QueryTest " och klicka på " Skapa ".
2 .
Skapa en ny tabell och namnge det " Tabell1 ". På den första raden Typ " John " under " Fält1 " och " Smith " under " Fält2 . "
Lägg till en rad genom att skriva " Jaime "under " Fält1 " och " Gonzalez "under " Fält2 . "
Spara " Tabell1 " och stäng .
3 .
Starta Microsoft Visual Basic 2010 Express och välj " Nytt projekt " under "Arkiv " -menyn . Välj " Windows Forms Application " och klicka "OK ".
Klicka på " Verktyg " på den vänstra delen av fönstret och dubbelklicka på " knappen " för att lägga till en knapp i formuläret . Dubbelklicka på " Button1 "för att öppna " Form1. vb "-modulen, där du skriver din kod .
4 .
Typ " Import System. Data. OleDb " på toppen av din " Form1. vb " modul .
Klicka i " Private Sub Button1_Click " att börja skriva Visual Basic-kod .
5 .
Skriv följande att deklarera din anslutning och variabler kommando :
Dim myConnToAccess Som OleDbConnection
Dim mySQLCommand Som OleDbCommand
Dim mySQLStrg As String
6 .
Skriv följande för att öppna en anslutning till din " QueryTest " Access-databas :
myConnToAccess=Nya OleDbConnection ( " Provider=Microsoft. Jet. OLEDB . 4. 0 , Data Source=C: \ QueryTest. mdb ; " )
myConnToAccess. Open ( )
Redigera " Source=C : \ QueryTest. mdb " och skriv in sökvägen där du sparade din Access -databas
7
Skriv följande för att köra en . " Delete " -fråga i din databas :
mySQLStrg=" DELETE Table1. Field1 FRÅN Tabell1 VAR ((( Table1. Fält1 )=' John '));"
mySQLCommand=Nya OleDbCommand ( mySQLStrg , myConnToAccess )
mySQLCommand. ExecuteNonQuery ( )
Du kommer att ta bort posten där " Fält1 "lika med" John ".
Tryck "F5 " för att köra dina program och klicka på " Button1 . "
Previous:nothing Next:Hur man monterar en iso-avbild i openSUSE