איך בונים סיסמה באקסס?

אליהו קופרמן

משתמש חדש
לא הבנתי איך עושים כניסת משתמשים עם סיסמא לכל אחד בנפרד אתה יכול להראות לי דוגמא? לא עבד לי לעשות אשכול חדש
 

אליהו קופרמן

משתמש חדש
ואפשר להדביק את זה באירוע בעת טעינה של הטופס או הדוח
קוד:
Dim strPas As String

strPas = InputBox("הקש סיסמה")

If StrPtr(strPas) = 0 Then
    MsgBox "סיסמה שגויה"
    DoCmd.Close acForm, "myform"
ElseIf strPas = "" Then
    MsgBox "סיסמה שגויה"
    DoCmd.Close acForm, "myform"
ElseIf strPas <> 123 Then
    MsgBox "סיסמה שגויה"
    DoCmd.Close acForm, "myform"
End If

(למבינים: אני לא יודע למה הוא לא נתן להיכנס בשורה אחת עם or אולי לכם פתרונים...)
אני צריך גם עוד שורה להקש שם משתמש
 

אולי מעניין אותך גם...

הפרק היומי

הפרק היומי! כל ערב פרק תהילים חדש. הצטרפו אלינו לקריאת תהילים משותפת!


תהילים פרק קיט א'

א אַשְׁרֵי תְמִימֵי דָרֶךְ הַהֹלְכִים בְּתוֹרַת יְהוָה:ב אַשְׁרֵי נֹצְרֵי עֵדֹתָיו בְּכָל לֵב יִדְרְשׁוּהוּ:ג אַף לֹא פָעֲלוּ עַוְלָה בִּדְרָכָיו הָלָכוּ:ד אַתָּה צִוִּיתָה פִקֻּדֶיךָ לִשְׁמֹר מְאֹד:ה אַחֲלַי יִכֹּנוּ דְרָכָי לִשְׁמֹר חֻקֶּיךָ:ו אָז לֹא אֵבוֹשׁ בְּהַבִּיטִי אֶל כָּל מִצְוֹתֶיךָ:ז אוֹדְךָ בְּיֹשֶׁר לֵבָב בְּלָמְדִי מִשְׁפְּטֵי צִדְקֶךָ:ח אֶת חֻקֶּיךָ אֶשְׁמֹר אַל תַּעַזְבֵנִי עַד מְאֹד:
נקרא  29  פעמים

לוח מודעות

למעלה