A Command függvénnyel visszaadhatja az Access elindításához használt parancssorargumentum részét.
Megjegyzések
Ha az Accesst parancssorból indítja, a parancssor /cmd beállítást követő részét megkapja a program parancssori argumentumként. A Command függvény ezt az argumentumot adja vissza.
A parancssori argumentum adatbázis-megnyitás utáni módosításához:
-
Válassza a Fájl menüben Az Access beállításai parancsot.
-
Az Access beállításai párbeszédpanelen kattintson a Speciális kategóriára.
-
Adja meg az új argumentumot a Parancssori argumentumok mezőben.
A Command függvény ezután a most megadott argumentumot fogja visszaadni.
Ha a Command függvényt Visual Basic for Applications- (VBA) kódon kívül használja egy modulban, akkor egy üres zárójelpárt kell írnia a függvény neve mögé. Ha például egy űrlap szövegmezőjében szeretné használni a Command függvényt, akkor állítsa a szövegmező Mező vagy kifejezés tulajdonságát az alábbihoz hasonló kifejezésre:
=Command()
Példa
Megjegyzés: A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
Az alábbi példa azt mutatja, hogyan lehet elindítani a parancssorból az Accesst, és hogyan lehet az argumentum értékét eredményül megkapni a Command függvény segítségével.
A példa teszteléséhez kattintson a Windowsban a Start menü Futtatás parancsára. Írja be az alábbi parancsot a Futtatás mezőbe, egyetlen sorba. (A parancssort alkotó részeket idézőjelbe kell tenni.)
"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"
Ezután készítsen egy új modult a Northwind Traders mintaadatbázisban, és adja hozzá az alábbi Sub eljárást:
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
Amikor meghívja ezt az eljárást, az Access megnyitja az Orders űrlapot. Létrehozhat egy AutoExec makrót is, hogy automatikusan meghívja az eljárást az adatbázis megnyitásakor.