La possibilité d'interroger des bases de données autres que celui que vous utilisez actuellement peut faire votre demande d'accès plus dynamiques , vous pouvez accomplir cela en utilisant Visual Basic pour Applications ( VBA) . Dans VBA, vous pouvez utiliser la méthode " OpenDatabase " pour définir le chemin et le nom de la base de données que vous souhaitez interroger . Après avoir défini la base de données , vous pouvez utiliser l'objet " d'enregistrements " pour afficher les résultats de votre requête . Choses que vous devez
Northwind base de données 2007
Voir Plus Instructions
1

lancement Access 2007 , cliquez sur " Nouvelle base de données ", puis cliquez sur le bouton "Créer". Sélectionnez « Database Tools " puis cliquez sur " Visual Basic ".
2

créer une nouvelle procédure en tapant le code suivant :

queryDatabase Private Sub ( )

Hôtels 3

créer trois nouvelles variables en tapant le code VBA suivant :

rst As Recordset

Dim dbs As Database

sqlstr Dim As String < br > Hôtels 4

Définir la base de données que vous allez interroger en entrant le code suivant :

Set dbs = OpenDatabase ("C: \\ Northwind 2007.accdb " )
5 < p > Créer une chaîne SQL en tapant le code suivant pour créer une requête :

sqlstr = " . . commandes SELECT [ Nom du navire ] , ordonnances [ Ship Adresse] "

sqlstr = sqlstr & " FROM Orders "

sqlstr = sqlstr & " GROUP BY commandes [ Nom du navire ], ordonnances [ Ship Adresse] ; . ».
6

Copiez et collez le code suivant pour ouvrir la requête par un " enregistrements " et afficher les résultats dans la fenêtre Exécution :

Set rst = dbs.OpenRecordset ( sqlstr )

rst.MoveLast

rst.MoveFirst

Do While Not rst.EOF

Debug.Print rst.Fields ( " Nom du navire " ) . Value

Debug.Print rst.Fields ( " Adresse de navire" ) . valeur

rst.MoveNext

boucle
7

la fin de votre procédure en tapant le code suivant :

rst.Close
< p > dbs.Close

End Sub