mostafaatiya قام بنشر أغسطس 6, 2021 مشاركة قام بنشر أغسطس 6, 2021 السلام عليكم ورحمه الله وبركاته مرفق بالملف كود الحاق بشرط لبيانات بنموذج غير منضم لجدول عندي جدول DATATB ونموذج FRM_DATA ويوجد بالنموذج كود الحاق بشرط لحقول غير منضمه محتاج اعدل في الكود علي اساس انو يعمل لرقم وليس لتاريخ الكود المرفق يتحقق من وجود تاريخ معين اذا سبق وتم ادخال هذا التاريخ للعميل لايقوم بالتسجيل وتظهر رسالة انه تم التسجيل من قبل لهذا العميل ده كلو موجود بالكود ولكن انا محتاج تعديل الكود ان يتحقق من ID العميل و YearCODE العام يعني لو العميل اللي رقم هويته 2013 تم تسجيلة في عام 2020 وانا جيت في نفس العام اضيفة يظهر رسالة بان العميل تم تسجيلة من قبل ولا يقوم بالتسجيل واذا كان العميل لا يتم تسجيلة لهذا العام يسجل عادي ده الكود Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("Select * From DATATB Where [ID]=" & Me.ID) rst.FindFirst "[data_eldfa1]=" & DateFormat(Me.d1) If rst.NoMatch = False Then MsgBox "سبق وتم تسجيل رقم الهوية لها العام" Exit Sub End If For i = 0 To Me.f - 1 rst.AddNew rst!ID = Me.ID rst!NAMEClient = Me.NAMEClient rst!Governorate = Me.Governorate rst!YearCODE = Me.YearCODE rst.Update Next i MsgBox "تم الالحاق بنجاح" وده السطر تحديدا اللي محتاج اعدل عليه rst.FindFirst "[data_eldfa1]=" & DateFormat(Me.d1) الملف بالمرفقات ولكم جزيل الشكر الحاق بشرط.accdb رابط هذا التعليق شارك More sharing options...
mostafaatiya قام بنشر أغسطس 6, 2021 الكاتب مشاركة قام بنشر أغسطس 6, 2021 UP رابط هذا التعليق شارك More sharing options...
عمر ضاحى قام بنشر أغسطس 6, 2021 مشاركة قام بنشر أغسطس 6, 2021 مهتم رابط هذا التعليق شارك More sharing options...
أفضل إجابة د.كاف يار قام بنشر أغسطس 7, 2021 أفضل إجابة مشاركة قام بنشر أغسطس 7, 2021 اتفضل التعديل الحاق بشرط.accdb 3 1 رابط هذا التعليق شارك More sharing options...
mostafaatiya قام بنشر أغسطس 7, 2021 الكاتب مشاركة قام بنشر أغسطس 7, 2021 شكرا جدا لحضرتك د. كاف يار تم الاجابة بارك الله فيك وجعلة في ميزان حسناتك رابط هذا التعليق شارك More sharing options...
amir_adam83 قام بنشر أغسطس 8, 2021 مشاركة قام بنشر أغسطس 8, 2021 On 8/7/2021 at 4:52 AM, د.كاف يار said: اتفضل التعديل الحاق بشرط.accdb 444 kB · 9 downloads ممتاز الله يعطيك الف عافيه استاذنا الكريم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان