Função Command

Você pode usar a função Comando para retornar a parte do argumento da linha de comando usada para iniciar o Access.

Comentários

Quando o Access é iniciado a partir da linha de comando, qualquer parte da linha de comando que segue a opção /cmd é passada para o programa como o argumento de linha de comando. Você pode usar a função Command para retornar o argumento que foi passado.

Para alterar um argumento de linha de comando depois que um banco de dados for aberto:

1. No menu Arquivo , clique em Opções do Access.
2. Na caixa de diálogo Configurações do Aplicativo , clique em Avançado.
3. Insira um novo argumento na caixa Argumentos de linha de comando .

A função Command agora retornará o novo argumento que você inseriu.

Quando a função Command for usada em qualquer lugar que não seja no código do Visual Basic for Applications (VBA) em um módulo, você deverá incluir parênteses vazios após a função. Por exemplo, para usar a função Command em uma caixa de texto em um formulário, você definiria a propriedade ControlSource da caixa de texto como uma expressão como a seguinte:

=Command()

Exemplo

O exemplo a seguir mostra como iniciar o Access com um argumento de linha de comando e, em seguida, mostra como retornar o valor desse argumento usando a função Command .

Para testar este exemplo, clique no botão Iniciar do Windows e clique em Executar. Digite o código a seguir na caixa Executar em uma única linha. (Você deve colocar as partes das informações de linha de comando entre aspas).

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

Em seguida, crie um novo módulo no banco de dados de exemplo da Northwind Traders e adicione o seguinte procedimento Sub :

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

Ao chamar este procedimento, o Access abrirá o formulário Pedidos. Você pode criar uma macro AutoExec para chamar esse procedimento automaticamente quando o banco de dados for aberto.