Microsoft Access ger små företag med en databaslösning . Åtkomst ingår i Microsoft Office-programpaket , så det är mer prisvärd än företagets databaser, t.ex. Oracle eller SQL Server . Tillträde har förmågan att köra frågor , så att du kan hämta poster för din webbapplikation från databasfilen . Eftersom Visual Basic ( VB ) är också en Microsoft- produkt , behöver hämta poster endast några få rader kod . Instruktioner
1
Skapa de variabler som behövs för frågans processen . En anslutning , fråga och spela uppsättning objekt behövs för att hämta poster från Visual Basic . Följande kod definierar varje VB objekt krävs:
Dim conn Som ADODB.ConnectionDim SQL Som StringDim rs Som ADODB.Recordset
2
Skapa anslutningen till Access-databasen . Anslutningen finner databasfilen och öppnar det , så att du kan köra frågor på filen . Följande kod öppnar Access-databasen :
conn.Open " Provider = Microsoft.Jet.OLEDB.4.0 , Data Source = c : \\ theDB.mdb " Addera 3
Skapa din frågesträng . Den " SQL " variabel definieras i steg ett används för att skapa din förfrågan . I detta exempel returnerar frågan det första namnet för en lista över kunder . I följande kod skapas en Access- fråga :
SQL = " SELECT förnamn från kund "
4
exekvera frågan på din Access- databas med hjälp av anslutningen objektet . Följande kod exekverar frågan och tilldelar resultaten till " rs " variabel skapades i steg ett :
rs.Open SQL , till ansl
5
Skriva ut en post verifiera frågan var framgångsrik . Du kan testa dina resultat genom att skapa ett meddelande som visar den första posten i resultatet . Följande skriver ut den första " förnamn " i din post set : .
MsgBox " Den första posten är " & rst [ 0 ] ToString Addera
