Komento-funktion avulla voit palauttaa Accessin käynnistämiseen käytetyn komentorivin argumenttiosan.
Huomautuksia
Kun Access käynnistetään komentoriviltä, mikä tahansa /cmd-asetusta seuraava komentorivin osa välitetään ohjelmalle komentoriviargumenttina. Komento-funktiolla voit palauttaa välitetyn argumentin.
Kun tietokanta on avattu, voit muuttaa komentorivin argumentin seuraavasti:
- Valitse Tiedosto-valikosta Accessin asetukset.
- Valitse Sovelluksen asetukset-valintaikkunassa Lisäasetukset.
- Lisää uusi argumentti Komentorivin argumentit -ruutuun.
Komento-funktio palauttaa tämän jälkeen lisäämäsi uuden argumentin.
Kun Command-funktiota käytetään muualla kuin moduulin VBA (Visual Basic for Applications) -koodissa, funktion jälkeen täytyy lisätä tyhjät sulkeet. Jos esimerkiksi haluat käyttää Komento-funktiota lomakkeen tekstiruudussa, määritä tekstiruudun OhjausobjektinLähde-ominaisuudeksi seuraavanlainen lauseke:
=Command()
Esimerkki
Huomautus
Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.
Seuraavassa esimerkissä näytetään, kuinka Access käynnistetään komentoriviargumentilla ja kuinka argumentin arvo palautetaan Command-funktiolla.
Testaa tämä esimerkki napsauttamalla Windowsin Käynnistä-painiketta ja valitsemalla Suorita. Kirjoita seuraava koodi yksittäisen rivin Suorita-ruutuun . (Komentorivin tietojen osat on ympäröitävä lainausmerkeissä.
"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"
Luo seuraavaksi uusi moduuli Northwind Traders -mallitietokantaan ja lisää seuraava Sub-toimintosarja:
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
Kun kutsut tämän toimintosarjan, Access avaa Orders (Tilaukset) -lomakkeen. Voit luoda automaattisesti suoritettavan makron, joka kutsuu tämän toimintosarjan automaattisesti, kun tietokanta avataan.