Funktsioon Command

Rakenduskoht
Microsoft 365 rakendus Access Access 2024 Access 2021 Access 2019 Access 2016

Funktsiooni Command abil saate tagastada Accessi käivitamiseks kasutatava käsurea argumendiosa.

Kommentaarid

Kui Access käivitatakse käsurealt, edastatakse programmile käsurea argumendina käsurea mis tahes osa, mis järgneb suvandile /cmd . Saate funktsiooni Command kasutada edastatud argumendi tagastamiseks.

Kui andmebaas on avatud, tehke käsurea argumendi muutmiseks järgmist.

  1. Valige Fail > Accessi suvandid.
  2. Liikuge dialoogiboksis Klientrakenduse sätted jaotisse Täpsemalt.
  3. Sisestage väljale Käsurea argumendid uus argument.

Funktsioon Command tagastab nüüd teie sisestatud uue argumendi.

Funktsiooni Command kasutamiseks moodulis väljaspool programmeerimiskeele Visual Basic for Applications (VBA) koodi tuleb lisada funktsiooni järele tühjad sulud. Näiteks funktsiooni Command kasutamiseks vormi tekstiväljal peaksite seadma tekstivälja atribuudi ControlSource väärtuseks avaldise järgmiselt:

=Command()

Näide

Märkus.

Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Järgmises näites kirjeldatakse Accessi käivitamist käsurea argumendi abil ja seejärel selle argumendi väärtuse tagastamist funktsiooni Command abil.

Selle näite testimiseks klõpsake Windowsi nuppu Start ja seejärel käsku Käivita. Tippige väljale Käivita ühele reale järgmine kood. (Käsureateabe osad tuleb ümbritseda jutumärkidega).


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

Järgmiseks looge näidisandmebaasis Northwind Traders uus moodul ja lisage järgmine alamprotseduur:


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

Selle protseduuri kutsumisel avab Access tellimuste vormi (Orders). Selle protseduuri automaatseks kutsumiseks andmebaasi avamise korral saate luua makro AutoExec.