(تمت الاجابة) إدخال اسم المستخدم في خلية في النموذج المستمر

[أيمن عبادي]

السلام عليكم ورحمة الله وبركاته ...

إخواني الأعضاء المحترمين

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

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

أرجو أن أكون قد وفقت لفهم المطلوب ..

بوركتم

Userswithform.rar

تم تعديل مايو 14, 2012 بواسطه أيمن عبادي

[محمد ايمن]

اخي ايمن السلام عليكم و رحمة الله و بركاته

هل هذا طلبك ؟؟

Userswithform1.rar

[أيمن عبادي]

نعم أخي محمد أيمن ... بارك الله فيك وجعله الله بميزان حساناتك

ماذا فعلت يا أخي ... أرجو التوضيح

[أبو آدم]

أخي العزيز أيمن

وبعد إذن محمد أيمن

إستخدم الكود التالي في حدث بعد التحديت :

Private Sub Required_File_No_AfterUpdate()

Me.Requester = VBA.Environ("USERDOMAIN")

End Sub

.................

[أيمن عبادي]

بارك الله فيك أخي أبو آدم ...

ولكن أخي بعد استخدام الكود ظهر لي اسم المستخدم على شكل رموز مختلفة

Userswithform1.rar

14.rar

[محمد ايمن]

في البداية السلام عليكم و رحمة الله و بركاته

اخي ابو آدم هل يستأذن صاحب الدار من أهل الدار ؟؟

وهل تعلو العين على الحاجب

اخي نارت كلامك صحيح 100% ولكن ما يقصده اخينا ايمن هو تسجيل اسم المستخدم للبرنامج ( وهو في مثاله ayman )

بينما الكود السابق يأخد اسم المستخدم للكومبيوتر( عندما جربته اعطاني asus-pc )

اما بالنسبة الى سؤالك اخ ايمن

قمت بانشاء وحدة نمطية جديدة و عرفت فيها متغيرا اسمه ( username ) وجعلت هذا المتغير عاما ( اي يستطيع اي كود استدعاءه )

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

اخيرا و بعد كتابة رقم ملف الموظف جعلت الحقل Requester مساويا لقيمة المتغير

ارجو ان اكون قد وفقت في الشرح

[أبو آدم]

عذراَ

تعجلت وأهملت مسألة كلمة السر واسم الدخول ، وطرحت كود التعرف على اسم الجهاز ، وليس مستخدم البرنامج

أؤيد حلّ الأخ محمد أيمن

شكراَ ... وإعتبرها فائدة إضافية

............

[أيمن عبادي]

السلام عليكم إخواني الأعزاء

نعم يا أمراء الأكسيس ... الموضوع 100 %

بارك الله فيك أخي أيمن محمد وجعله بميزان حساناتك

وأنت أخي أبو آدم بالمثل بإذن الله

دمتم لنا سالمين ... :fff: :fff: