Funkcja Command umożliwia zwrócenie części argumentów wiersza polecenia użytej do uruchomienia programu Access.
Spostrzeżenia
Gdy program Access jest uruchamiany z poziomu wiersza polecenia, dowolna część wiersza polecenia, która następuje po opcji /cmd , jest przekazywana do programu jako argument wiersza polecenia. Możesz użyć funkcji Command , aby zwrócić przekazany argument.
Aby zmienić argument wiersza polecenia po otwarciu bazy danych:
- W menu Plik kliknij polecenie Opcje programu Access.
- W oknie dialogowym Ustawienia aplikacji kliknij przycisk Zaawansowane.
- Wprowadź nowy argument w polu Argumenty wiersza polecenia .
Funkcja Command zwróci teraz nowy argument, który wprowadziłeś.
Jeśli funkcja Command jest używana w dowolnym miejscu innym niż w kodzie języka Visual Basic for Applications (VBA) w module, po funkcji należy umieścić puste nawiasy okrągłe. Aby na przykład użyć funkcji Command w polu tekstowym w formularzu, należy ustawić właściwość ControlSource pola tekstowego na wyrażenie podobne do następującego:
=Command()
Przykład
Uwaga
Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.
W poniższym przykładzie pokazano, jak uruchomić program Access za pomocą argumentu wiersza polecenia, a następnie jak zwrócić wartość tego argumentu przy użyciu funkcji Command .
Aby przetestować ten przykład, kliknij przycisk Start systemu Windows, a następnie kliknij pozycję Uruchom. W jednym wierszu w polu Uruchom wpisz następujący kod. (Części informacji wiersza polecenia należy ująć w cudzysłowy).
"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"
Następnie utwórz nowy moduł w przykładowej bazie danych Northwind Traders i dodaj następującą podprocedurę :
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
Po wywołaniu tej procedury program Access otworzy formularz Zamówienia. Można utworzyć makro AutoExec w celu automatycznego wywoływania tej procedury podczas otwierania bazy danych.