عدم تكرار البيانات

[عفرنس]

أرغب في كود يمنع تكرار البيانات لنفس الشهر لكل عامل في حال تم إدخالها مسبقا ورسالة تنبيه بذلك .

توضيح اكثر : 

إذا كان العامل ( ممتاز ) أدخلت بياناته بتاريخ اليوم 29-06 يمنع تكرار ادخال البيانات لنفس العامل في هذا الشهر وليس اليوم .

والرسالة تكون / تم ادخال بيانات ( اسم العامل ) لهذا الشهر ) 

دمتم بود 

1.accdb

[محمد أبوعبدالله]

السلام عليكم

اضف الكود التالي

    If Rs("F_Name") = Me.Xname.Column(0) Then
    
            If DatePart("m", Rs("F_Date")) = DatePart("m", XDate) Then
                MsgBox "تم ادخال بيانات العامل / " & Me.Xname.Column(0) & " لهذا الشهر"
            Exit Sub
            End If
            
    End If

Up-1.rar

تحياتي

[عفرنس]

12 ساعات مضت, محمد أبوعبدالله said:

السلام عليكم

اضف الكود التالي

    If Rs("F_Name") = Me.Xname.Column(0) Then
    
            If DatePart("m", Rs("F_Date")) = DatePart("m", XDate) Then
                MsgBox "تم ادخال بيانات العامل / " & Me.Xname.Column(0) & " لهذا الشهر"
            Exit Sub
            End If
            
    End If

Up-1.rar 48.25 kB · 1 تنزيلات

تحياتي

أخي @ محمد أبو عبدالله 

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

[عفرنس]

4 ساعات مضت, فايز.. said:

أخي @ محمد أبو عبدالله 

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

@jjafferr @محمد أبوعبدالله 

يحتاج الكود لإعادة النظر فيه . جزيتم خيرا

[محمد التميمي]

من

 

 

تم تعديل يونيو 29, 2020 بواسطه محمد التميمي

[ابو ياسين المشولي]

مشاركة مع الاخوان

Up-1.accdb

[عفرنس]

15 دقائق مضت, ابو ياسين المشولي said:

مشاركة مع الاخوان

Up-1.accdb 620 kB · 1 تنزيلات

أخي @ابو ياسين المشولي

الكود عمل تمام مع العامل اللي اسمه ممتاز 

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

 

الأمر الآخر ياليت تشرح لي الكود بالتفصيل للفائدة 

[د.كاف يار]

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

1.accdb

[husamwahab]

مشاركة مع الاساتذة

 

root-100.rar

[عفرنس]

5 ساعات مضت, د.كاف يار said:

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

1.accdb 624 kB · 4 تنزيلات

جزاك الله خيرا .. لكن المشكلة ما زالت  مع العامل الآخر . 

[عفرنس]

5 ساعات مضت, husamwahab said:

مشاركة مع الاساتذة

 

root-100.rar 46.46 kB · 2 تنزيلات

أخي @husamwahab

جربت الكود مع الملف الأصلي عندي ولم يضبط وهذا هو الملف : انظر لاهنت وين المشكلة ؟؟

11.accdb

[husamwahab]

تفضل التعديل

ملاحظة :لاحظ التعديل في جدول salary

 

11-a.rar

[محمد أبوعبدالله]

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

التعديل الاخير يعمل بشكل جيد ان شاء الله

UPP-1.rar

تحياتي

[عفرنس]

20 ساعات مضت, محمد أبوعبدالله said:

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

التعديل الاخير يعمل بشكل جيد ان شاء الله

UPP-1.rar 49.59 kB · 3 تنزيلات

تحياتي

شكرا لك أخي الفاضل محمد .. تم المطلوب بنجاح 

20 ساعات مضت, محمد أبوعبدالله said:

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

التعديل الاخير يعمل بشكل جيد ان شاء الله

UPP-1.rar 49.59 kB · 3 تنزيلات

تحياتي

جزاك الله خيرا .. تم المطلوب بنجاح