ادراج اسم المستخدم لجميع الاعمال

تفضل التعديل اخي الكريم

Password (1).rar

بارك الله فيك و نفعك الله بعلمك و رفع قدرك

ممكن استاذي الفاضل تشرح لى بارك الله فيك عشان اسجل جميع الاعمال المدخلة باسم المدخل ... وشكرا

اعتذر نسيت المرفق

Password.rar

htkamal استاذي العزيز ++ انت لم تكمل باقي الطلب ... لذا ارجو منك اكمال الموضوع ... وشكرا

اخي الكريم سأشرح لك الموضوع بالتفصيل 

اولاً / تم استدعاء اسم المستخدم UserName  من جدول PASS

بناء على المدخلات في حقل n1 و حقل n2

DLookup("[UserName]", "[Pass]", "[UserName]  = '" & [n1] & "' AND [Password]= '" & [n2] & "' ")

اذا تحقق شرط التطابق اسم المستخدم في النموذج مع اسم المستخدم و كلمة المورر المدخل في النموذج  

If DLookup("[UserName]", "[Pass]", "[UserName]  = '" & [n1] & "' AND [Password]= '" & [n2] & "' ") = Me.n1 Then

سيتم تنفيذ شرط فتح النموذج 

و ارسال اسم المستخدم الى حقل التمسية رقم 3

وسيتم اغلاق نموذج الدخول

DoCmd.OpenForm "welcome"
[Forms]![welcome]![تسمية3].Caption = "اهلا وسهلا بك" & " : " & Me.n1
DoCmd.Close acForm, "pass"

لكن توجد طريقة سهلة جداً 

اضف مربع نص في الصفحة الرئيسية welcome

و اجعل مصدر عنصر التحكم هو 

[Forms]![Pass]![n1]

هنا قمنا بجلب اسم المستخدم من صفحة تسجيل الدخول و لنا كامل الحرية في التحكم بها في جميع النماذج و التقارير