Функция Command

Отнася се за
Access за Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Можете да използвате функцията Command , за да върнете частта с аргументите от командния ред, използван за стартиране на Access.

Забележки

Когато Access се стартира от командния ред, всяка част от командния ред, която следва опцията /cmd , се подава на програмата като аргумент на командния ред. Можете да използвате функцията Command , за да върнете предадения аргумент.

За да промените аргумент от командния ред след отварянето на база данни:

  1. В менюто "Файл " щракнете върху "Опции на Access".
  2. В диалоговия прозорец " Настройки на приложението " щракнете върху "Разширени".
  3. Въведете нов аргумент в полето "Аргументи на командния ред ".

Сега функцията Command ще върне въведения от вас нов аргумент.

Когато функцията Command се използва на различно място във Visual Basic for Applications (VBA) код в модул, трябва да поставите празни скоби след функцията. Например за да използвате функцията Command в текстово поле на формуляр, трябва да зададете свойството "ControlSource " на текстовото поле на израз като следния:

=Command()

Пример

Забележка

Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Следващият пример показва как да стартирате Access с аргумент от командния ред и след това показва как да се върне стойността на този аргумент с помощта на функцията Command .

За да тествате този пример, щракнете върху бутона "Старт " на Windows и щракнете върху "Изпълнение". Въведете следния код в полето "Изпълнение " на един ред. (Трябва да оградите частите от информацията в командния ред с кавички).


"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"

След това създайте нов модул в примерната база данни Northwind Traders и добавете следната подпроцедура :


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

Когато извикате тази процедура, Access отваря формуляра "Поръчки". Можете да създадете автоматично изпълняван макрос, за да извикавате тази процедура автоматично при отваряне на базата данни.