Vous pouvez utiliser la fonction Commande pour renvoyer la partie argument de la ligne de commande utilisée pour lancer Access.
Remarques
Lorsque Access est lancé à partir de la ligne de commande, toute partie de la ligne de commande qui suit l’option /cmd est transmise au programme en tant qu’argument de ligne de commande. Vous pouvez utiliser la fonction Commande pour renvoyer l’argument qui a été passé.
Pour modifier un argument de ligne de commande une fois qu’une base de données a été ouverte :
- Dans le menu Fichier , cliquez sur Options d’Access.
- Dans la boîte de dialogue Paramètres de l’application, cliquez sur Avancé.
- Entrez un nouvel argument dans la zone Arguments de ligne de commande .
La fonction Command renverra maintenant le nouvel argument que vous avez entré.
Lorsque la fonction Command est utilisée ailleurs que dans le code Visual Basic pour Applications (VBA) d’un module, vous devez insérer des parenthèses vides après la fonction. Par exemple, pour utiliser la fonction Commande dans une zone de texte d’un formulaire, vous devez définir la propriété SourceContrôle de la zone de texte sur une expression semblable à celle-ci :
=Command()
Exemple
Remarque
Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence développeur dans la liste déroulante en regard de Rechercher , puis entrez un ou plusieurs termes dans la zone de recherche.
L’exemple suivant montre comment lancer Access avec un argument de ligne de commande, puis comment retourner la valeur de cet argument à l’aide de la fonction Commande .
Pour tester cet exemple, cliquez sur le bouton Démarrer de Windows, puis sur Exécuter. Tapez le code suivant dans la zone Exécuter sur une seule ligne. (Vous devez mettre les parties des informations de ligne de commande entre guillemets).
"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"
Ensuite, créez un nouveau module dans l’exemple de base de données Northwind Traders et ajoutez la sous-procédure suivante :
Public Sub CheckCommandLine()
' Check the value returned by Command function and display
' the appropriate form.
If Command = "Orders" Then
DoCmd.OpenForm "Orders"
ElseIf Command = "Employees" Then
DoCmd.OpenForm "Employees"
Else
Exit Sub
End If
End Sub
Lorsque vous appelez cette procédure, Access ouvre le formulaire Commandes. Vous pouvez créer une macro AutoExec pour appeler cette procédure automatiquement lorsque la base de données est ouverte.