אקסס למתחילים: תגובות
-
-
@spider
תעשה מסך כניסה שם יצטרכו לבחור שם משתמש וסיסמה.
בטבלת המשתמשים, תוסיף עמודה של רמת הרשאות, שם יוכלו לבחור בין משתמש, מנהל ומנהל בכיר, או כל הרשאה שהיא.
במסך הכניסה תעשה תיבה משולבת, שיקבל את עמודת שם המשתמש ורמת ההרשאה (תוכל להסתיר את רמת ההרשאה)
בעת סגירת טופס הכניסה או בלחצן כניסה, תוסיף את השורות הזאת.[TempVars]![Permissionlevel] = Me.cobUser.Column(1)
במקום Column(1) תכתוב את מספר העמודה ששם יהיה רמת הרשאה.
תוסיף משתנים אלו במודול כללי
Global CanDel As Boolean Global CanEdit As Boolean
תוסיף מודול הזה לפרוייקט:
sub Permissionlevel () Dim strPermissionlevel As String strPermissionlevel = [TempVars]![Permissionlevel] If strPermissionlevel = "מנהל בכיר" Then CanEdit = True CanDel = True ElseIf strPermissionlevel = "מנהל" Then CanDel = True CanEdit = False Else CanDel = False CanEdit = False End If End sub
ובאירוע בעת פתיחה של טופס, תוסיף את הקוד הזה.
Call Permissionlevel Me.AllowEdits = CanEdit Me.AllowDeletions = CanDel
-
@מלא אם הבנתי נכון אני צריך קודם כל ליצור טבלה עם עמודה לשם משתמש, לסיסמא, ולהרשאות נכון?
תוסיף משתנים אלו במודול כללי
מה הכוונה מודול כללי איפה להוסיף?
תוסיף מודול הזה לפרוייקט:
להכניס את הקוד הזה לטופס? או לפרוייקט?(איך מכניסים את זה לפרוייקט?)
תודה ענקית וסליחה על הבורות
-
@spider אמר באקסס למתחילים: תגובות:
@מלא אם הבנתי נכון אני צריך קודם כל ליצור טבלה עם עמודה לשם משתמש, לסיסמא, ולהרשאות נכון?
נכון מאוד.
תוסיף משתנים אלו במודול כללי
מה הכוונה מודול כללי איפה להוסיף?
מודול כללי, הכוונה למודול שאינו תלוי בטופס - אפשר לקרוא לפונקציות שלו כל הזמן.
תוסיף מודול הזה לפרוייקט:
להכניס את הקוד הזה לטופס? או לפרוייקט?(איך מכניסים את זה לפרוייקט?)
בכרטיסיה 'יצירה' בצד שמאל, יש 'מודול'
תיצור ככה מודול ותוסיף את הקוד.
במודול הזה למעלה, אחרי השורה או 2 השורות הראשונות, תדביק את 2 המשתנים.תודה ענקית וסליחה על הבורות
נ.ב. עכשיו שמתי לב שהאשכול הזה גנוב,
צריך לחזור בתשובה, אם יש עוד שאלות, מקומם באשכול חדש. -