A Command függvénnyel visszaadhatja az Access elindításához használt parancssor argumentumrészét.
Megjegyzések
Ha az Accesst a parancssorból indítja el, a parancssor /cmd kapcsolót követő bármely része parancssori argumentumként lesz átadva a programnak. 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 a Command függvényt egy űrlap szövegmezőjében szeretné használni, a szövegmező ControlSource tulajdonságát az alábbihoz hasonló kifejezésre kell beállítania:
=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.