הפונקציה Command

באפשרותך להשתמש בפונקציה Command כדי להחזיר את חלק הארגומנט של שורת הפקודה המשמש להפעלת Access.

הערות

כאשר Access מופעל משורת הפקודה, כל חלק משורת הפקודה שמופיע לאחר האפשרות /cmd מועבר לתוכנית כארגומנט של שורת הפקודה. באפשרותך להשתמש בפונקציה Command כדי להחזיר את הארגומנט שהועבר.

כדי לשנות ארגומנט של שורת פקודה לאחר פתיחת מסד נתונים:

1. בתפריט קובץ , לחץ על אפשרויות Access.
2. בתיבת הדו-שיח Application Settings , לחץ על Advanced.
3. הזן ארגומנט חדש בתיבת הארגומנטים של שורת הפקודה .

כעת הפונקציה Command תחזיר את הארגומנט החדש שהזנת.

כאשר הפונקציה Command נמצאת בשימוש במקום שאינו בקוד Visual Basic for Applications (VBA) במודול, יש לכלול סוגריים ריקים אחרי הפונקציה. לדוגמה, כדי להשתמש בפונקציה Command בתיבת טקסט בטופס, עליך להגדיר את המאפיין ControlSource של תיבת הטקסט לביטוי כגון הבא:

=Command()

דוגמה

הדוגמה הבאה מראה כיצד להפעיל את 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 פותח את הטופס Orders. באפשרותך ליצור מאקרו מסוג AutoExec כדי לקרוא לפרוצדורה זו באופן אוטומטי כאשר מסד הנתונים נפתח.