في المديول الذي اسمه Defs اضفت هذا السطر
Public ShowUser As String
وفي نموذج كلمة المرور frm-UserLogon اضفت هذه السطر في آخر حدث زر دخول
ShowUser = MyUser.UserName
ثم في النموذج وايضا في التقرير وضعت هذا السطر
txtx = ShowUser
وافعل ذلك في جميع نماذجك وتقاريرك
المرفق هو المرفق السابق نفسه مختصرا
اسم الدخول admin وكلمة المرور 2439
up2.rar