חל על
אובייקט Form |
באפשרותך להשתמש במאפיין RecordsetType כדי לציין איזה סוג של ערכת רשומות הפך לזמין עבור טופס. קריאה/כתיבה.
ביטוי.RecordsetType
ביטוי נדרש. ביטוי שמחזיר אחד מהאובייקטים ברשימה חל על.
הערות
המאפיין RecordsetType משתמש בהגדרות הבאות במסד נתונים של Microsoft Access (.mdb או .accdb).
הגדרה |
Visual Basic |
תיאור |
ערכת רשומות דינאמית |
0 |
(ברירת מחדל) באפשרותך לערוך פקדים מאוגדים בהתבסס על טבלה אחת או טבלאות עם קשרי גומלין של יחיד ליחיד. עבור פקדים המאוגדים לשדות המבוססים על טבלאות עם קשרי גומלין של יחיד לרבים, לא ניתן לערוך נתונים משדה הצירוף בצד ה"יחיד" של קשר הגומלין, אלא אם כן זמין עדכון מדורג בין הטבלאות. |
ערכת רשומות דינאמית (עדכונים לא עקביים) |
1 |
כל הטבלאות והפקדים המאוגדים לשדות שלהם ניתנים לעריכה. |
תמונה |
2 |
אין טבלאות או פקדים המאוגדים לשדות שלהם אשר ניתנים לעריכה. |
הערה: אם אינך רוצה שנתונים בפקדים מאוגדים יהיו ניתנים לעריכה כאשר טופס נמצא ב- תצוגת טופס או תצוגת גליון נתונים, באפשרותך להגדיר את המאפיין RecordsetType ל'תמונה'.
המאפיין RecordsetType משתמש בהגדרות הבאות ב- פרוייקט Microsoft Access (.adp).
הגדרה |
Visual Basic |
תיאור |
תמונה |
3 |
אין טבלאות או פקדים המאוגדים לשדות שלהם אשר ניתנים לעריכה. |
תמונה ניתנת לעדכון |
4 |
(ברירת מחדל) כל הטבלאות והפקדים המאוגדים לשדות שלהם ניתנים לעריכה. |
הערה: באפשרותך להגדיר מאפיין זה על-ידי שימוש ב- גליון מאפיינים של טופס, מאקרו, או בקוד Visual Basic for Applications (VBA).
הערה: שינוי המאפיין RecordsetType של טופס או דוח פתוח גורם ליצירה מחדש אוטומטית של ערכת הרשומות.
באפשרותך ליצור טפסים המבוססים על טבלאות מרובות המשמשות כבסיס עם שדות המאוגדים לפקדים בטפסים. בהתאם להגדרת המאפיין RecordsetType, ניתן להגביל את הפקדים המאוגדים שניתנים לעריכה.
בנוסף לפקד העריכה שמסופק על-ידי RecordsetType, לכל פקד בטופס יש מאפיין Locked שניתן להגדיר כדי לציין אם הפקד והנתונים שלו המהווים בסיס ניתנים לעריכה. אם המאפיין Locked מוגדר ל'כן', לא ניתן לערוך את הנתונים.
דוגמה
בדוגמה הבאה, רק אם מזהה המשתמש הוא ADMIN, ניתן לעדכן רשומות. דוגמת קוד זו מגדירה את המאפיין RecordsetType ל'תמונה' אם ערך המשתנה הציבורי gstrUserID אינו ADMIN.
Sub Form_Open(Cancel As Integer)
Const conSnapshot = 2 If gstrUserID <> "ADMIN" Then Forms!Employees.RecordsetType = conSnapshot End If End Sub