عمل شاشة دخول

[2saad]

إخواني الأعزاء أعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته

كل عام وأنتم بخير يغفر الله لنا ولكم في هذا الشهر المعظم

عندي ملف به جدول وفورم دخول للبرنامج ( login )

أنا عايز لما اختار اسم الميتخدم من الكمبوبكس يجلب الاسم كاملا وصورة المستخدم

انا اشتغلت عليه ولكن لم أفلح

saad.accdb

[Foksh]

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

ابسط طريقة هي استخدام الدالة Dlookup بشرط رقم الموظف الفريد .

 

لم اطلع على الملف ، هي مجرد فكرة.

[kkhalifa1960]

تفضل استاذ @2saad طلبك حسب مافهمت . ووافني بالرد .

Saad.rar

[Foksh]

1 ساعه مضت, Foksh said:

ابسط طريقة هي استخدام الدالة Dlookup بشرط رقم الموظف الفريد .

تنفيذاً لما ذكرته لك :-

قمت بتغيير عنصر الصورة القديم الى عنصر صورة غير منضم فقط . والحدث في بعد التحديث للكومبوبوكس :-

Private Sub cmbUser_AfterUpdate()
On Error GoTo Err_Handler

    Me.txtFullName = DLookup("fullname", "tblUsers", "username = '" & Me.cmbUser.Column(1) & "'")
    Me.imgPhoto.Picture = DLookup("Photo", "tblUsers", "username = '" & Me.cmbUser.Column(1) & "'")

Exit Sub

Err_Handler:
    MsgBox "حدث خطأ : الصورة غير موجودة في المجلد", vbCritical + vbMsgBoxRight, "خطأ"
    Me.imgPhoto.Picture = ""
End Sub

أما فكرة الأستاذ خليفة 

فهي جميلة لأنها تقوم ببناء المسار الكامل للصورة أولاً .

ثانياً أسهل لإضافة حقول أخرى في المستقبل ، لو حبيت تطور الفكرة . ثالثاً تتعامل مع جميع الإحتمالات . وانا افترضت أن مسار الصور في الحقول ثابت وغير قابل للعبث

 

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

 

saad1.zip

تم تعديل منذ 4 ساعات بواسطه Foksh
تنسيق الرد

[2saad]

شكرا لكما وبارك الله فيكما وأكثر الله من أمثالكما وزادكما الله من علمه

[2saad]

لو سمحت استاذي الفضل خليفة أنا مش عارف اتعامل مع اضافة الصور

ممكن شرح بسيط 

[kkhalifa1960]

تفضل  الشرح .  ولاحظ انا لا اعتمد على المسار المسجل بل اعتمد على اسم الصورة وامتدادها ليعمل البرنامج من اي مكان طالما مجلد الصور بجوار القاعدة  .   

                                                                  

Saad.rar

تم تعديل منذ 1 ساعه بواسطه kkhalifa1960

[2saad]

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

لي سؤالين 

عندما اغير الباسورد تاتي هذه الرسالة

السؤال الثاني

عايز كلمة السر تظهر علي هيئة نجوم

[منتصر الانسي]

بعد إذن الاخ @kkhalifa1960 

38 دقائق مضت, 2saad said:

عندما اغير الباسورد تاتي هذه الرسالة

من خاصية (التنسيق أو Format) لمربع النص قم بإزالة علامتي النجمة

38 دقائق مضت, 2saad said:

عايز كلمة السر تظهر علي هيئة نجوم

إفتح الجدول في عرض التصميم ومن خاصية (قناع الإدخال أو Input Mask) للحقل قم بكتابة Password ثم طبق نفس التعديل في مربع النص في النموذج

أما إذا أردت أن يظل ظاهراً في الجدول وتريد إخفاؤه في النموذج فقط فطبق التعديل في مربع النص فقط

تحياتي

تم تعديل منذ 1 ساعه بواسطه منتصر الانسي

[2saad]

بارك الله فيك وشكرا جزيلا