Μπορείτε να χρησιμοποιήσετε τη συνάρτηση Command για να επιστρέψετε το όρισμα τμήμα της γραμμή εντολών που χρησιμοποιείται για την εκκίνηση Microsoft Office Access 2007.
Παρατηρήσεις
Όταν η Access εκκινείται από τη γραμμή εντολών, οποιοδήποτε τμήμα της γραμμής εντολών που ακολουθεί την επιλογή /cmd μεταβιβάζεται στο πρόγραμμα ως όρισμα γραμμής εντολών. Μπορείτε να χρησιμοποιήσετε τη συνάρτηση Command για να επιστρέψετε το όρισμα που έχει μεταβιβαστεί.
Για να αλλάξετε ένα όρισμα γραμμής εντολών μετά το άνοιγμα μιας βάσης δεδομένων:
-
Στο μενού Αρχείο , κάντε κλικ στην επιλογή Επιλογές της Access.
-
Στο παράθυρο διαλόγου Ρυθμίσεις εφαρμογής , κάντε κλικ στην επιλογή Για προχωρημένους.
-
Εισαγάγετε ένα νέο όρισμα στο πλαίσιο Ορίσματα γραμμής εντολών .
Η συνάρτηση Command θα επιστρέψει τώρα το νέο όρισμα που έχετε εισαγάγει.
Όταν η συνάρτηση Command χρησιμοποιείται οπουδήποτε αλλού εκτός από κώδικα Visual Basic for Applications (VBA) σε μια λειτουργική μονάδα, πρέπει να συμπεριλάβετε κενές παρενθέσεις μετά τη συνάρτηση. Για παράδειγμα, για να χρησιμοποιήσετε τη συνάρτηση Command σε ένα πλαίσιο κειμένου σε μια φόρμα, θα πρέπει να ορίσετε την ιδιότητα ControlSource του πλαισίου κειμένου σε μια παράσταση όπως η εξής:
=Command()
Παράδειγμα
Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στην Αναζήτηση και πληκτρολογήστε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Το παρακάτω παράδειγμα δείχνει πώς μπορείτε να εκκινήσετε την Access με ένα όρισμα γραμμής εντολών και, στη συνέχεια, δείχνει πώς μπορείτε να επιστρέψετε την τιμή αυτού του ορίσματος χρησιμοποιώντας τη συνάρτηση Command .
Για να δοκιμάσετε αυτό το παράδειγμα, κάντε κλικ στο κουμπί Έναρξη των Windows και κάντε κλικ στην επιλογή Εκτέλεση. Πληκτρολογήστε τον παρακάτω κωδικό στο πλαίσιο Εκτέλεση σε μία γραμμή. (Πρέπει να περικλείετε τα τμήματα των πληροφοριών της γραμμής εντολών σε εισαγωγικά).
"C:\Program Files\Microsoft Office\Office11\Msaccess.exe" _
"C:\Program Files\Microsoft Office\Office11\Samples\Northwind.mdb" /cmd "Orders"
Στη συνέχεια, δημιουργήστε μια νέα λειτουργική μονάδα στο δείγμα βάσης δεδομένων Northwind Traders και προσθέστε την ακόλουθη δευτερεύουσα διαδικασία:
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
Όταν καλείτε αυτήν τη διαδικασία, η Access ανοίγει τη φόρμα "Παραγγελίες". Μπορείτε να δημιουργήσετε μια μακροεντολή AutoExec για να καλέσετε αυτή τη διαδικασία αυτόματα όταν ανοίγει η βάση δεδομένων.
