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