اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر (معدل)

السلام عليكم
وجدت صعوبة في كيفية استعمال الدالة DlookUp في نموذج فمثلا
عند الضغط على زر اضافة مستخدم اذا كان اسم المدخل من طرف المستعمل موجود مسبقلا في النموذج فان النموذج لا يقوم باضافة المستخدم وتخرج رسالة بان اسم المستخدم موجود الرجاء اعادة اسم اخر.
وهل يمكنني فعل هذا باستعمال if. 
افدوني والسلام عليكم
سارفق الملف

اضافة مستخدم.rar

تم تعديل بواسطه bilouinfo
قام بنشر
1 ساعه مضت, bilouinfo said:

السلام عليكم
وجدت صعوبة في كيفية استعمال الدالة DlookUp في نموذج فمثلا
عند الضغط على زر اضافة مستخدم اذا كان اسم المدخل من طرف المستعمل موجود مسبقلا في النموذج فان النموذج لا يقوم باضافة المستخدم وتخرج رسالة بان اسم المستخدم موجود الرجاء اعادة اسم اخر.
وهل يمكنني فعل هذا باستعمال if. 
افدوني والسلام عليكم
سارفق الملف

اضافة مستخدم.rar

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

أخي الكريم

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

فكتابة الاكواد مع استخدام اللغة العربية صعب جداً ويؤدي إلى أخطاء كثيره

نصيحة قم بإعادة تسمية الكائنات الى اللغة الانجليزية قبل ان تبتعد كثيرا في اكمال البرنامج

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

لا أخفيك امضيت ساعة كاملة لكي اكتب الكود وعندما تمكنت من كتابته لم احصل على نتائج صحيحة بسبب

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

::بالتوفيق::


إذا كنت ترى هذه المشاركة مفيدة فلا تنسى التقييم

2018-05-01_09-27-20.gif.2d80794fadd1705c39d0581294811049.gif

  • Like 1
  • Thanks 1
قام بنشر

شكرا استاذي kaser906 على ردك الجميل.

ساحاول تطبيق كل ما قلته لي، لكن هل تكرمت وارسلت الي الكود الذي كتبه لارى على الاقل الطريقة التي اتبعتها انت.

قام بنشر

تفضل

ضع الكود في حدث قبل التحديث للحقل اسم المستخدم

 

Dim x
x = DLookup("[اسم_المستخدم]", "المستخدمين", "اسم_المستخدم='" & Me.اسم_المستخدم & "'")
If Not (IsNull(x)) Then
MsgBox "تم تسجيل هذا الاسم مسبقا فضلا قم بأختيار اسم أخر"
DoCmd.CancelEvent
End If


إذا كنت ترى هذه المشاركة مفيدة فلا تنسى التقييم

2018-05-01_09-27-20.gif.2d80794fadd1705c39d0581294811049.gif

  • Like 2
قام بنشر

ممتاز

الان دعنا نتفق أن يكون رقم المستخدم يكون عن طريق إدخال يدوي بدل أسمه ( اسم المستخدم)

مثلا كل مستخدم يتم تسجيل عن طريق رقم حاسب أو عن طريق رقم الهوية ( الرقم القومي مثلا )

فهل يناسبك الحل ؟

 


 

 

  • Like 1
قام بنشر (معدل)

اسمحلي استذنا طولت عليك،

تقصد ان اقوم بتغيير رقم المستخدم من رقم تلقائي الي رقم اقوم بادخاله يدويا.

فعلت ذلك 

تم تعديل بواسطه bilouinfo
قام بنشر

اريد ان اغير فكرتك تماماً من تسجيل

مستخدم عن طريق حقل نص

عند الاضافة سنستخدم رقم لاضافة مستخدم

جرب المرفق

ادخل مستخدم جديد عن طريق الرقم 1

و وافني بالنتيجة

::بالتوفيق::


 

 


 

 

ajouter utilisateur.kaser906.1.rar

  • Like 1
  • Thanks 2

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • اضف...

Important Information