Hvordan Query en database i Access 2007

Muligheten til å søke fra andre enn den du bruker nå kan gjøre Access-program mer dynamisk databaser; du kan oppnå dette ved hjelp av Visual Basic for Applications (VBA). I VBA, kan du bruke "OpenDatabase" metode for å definere banen og navnet på databasen som du ønsker å spørre. Når du har definert i databasen, kan du bruke "Recordset" objekt for å vise resultatene av søket.

Bruksanvisning

1 Start Access 2007, klikk på "Blank Database" og deretter på "Create" -knappen. Velg "Database Verktøy" og deretter "Visual Basic."

2 Opprett en ny prosedyre ved å skrive inn følgende kode:

Private Sub queryDatabase ()

3 Lag tre nye variabler ved å skrive følgende VBA-kode:

Dim rst As Recordset

Dim dbs som database

Dim SQLStr As String

4 Definer databasen du vil søke ved å skrive inn følgende kode:

Sett DBS = OpenDatabase ( "C: \ North 2007.accdb")

5 Lag en SQL streng ved å skrive følgende kode for å bygge en spørring:

SQLStr = "Velg bestillinger. [Skipsnavn], ordrer. [Ship adresse]"

SQLStr = SQLStr & "Fra Orders"

SQLStr = SQLStr & "GROUP BY Orders [Ship Name], bestillinger [Ship adresse],.."

6 Kopier og lim inn følgende kode for å åpne spørringen gjennom en "Recordset" og vise resultatene til Immediate vinduet:

Sett rst = dbs.OpenRecordset (SQLStr)

rst.MoveLast

rst.MoveFirst

Gjør Mens Ikke rst.EOF

Debug.Print rst.Fields("Ship Name").Value

Debug.Print rst.Fields ( "Ship-adresse"). Verdi

rst.MoveNext

Loop

7 Avslutt prosedyren ved å skrive inn følgende kode:

rst.Close

dbs.Close

End Sub