محمود العراقى قام بنشر ديسمبر 31, 2016 قام بنشر ديسمبر 31, 2016 السلام عليكم لدى قاعدة بيانات لعملاء، مسجل لديهم بعض البيانات ومن ضمن هذه البيانات رقم التليفون، وقد يحدث أن يتكرر رقم التليفون لأكثر من عميل وهذا هو صميم عملى، أريد عند الضغط على زر بحث فى النموذج المرفق، أن يتم تطبيق البحث واستخراج البيانات فى النموذج، وفى حالة عدم وجود الرقم تظهر رسالة تفيد بأن "الرقم الذى تريد البحث عنه غير موجود " ورسالة فى حالة تكرار الرقم تفيد بأن " هذا الرقم مكرر ". وشكراً الحجز 2016.rar
صالح حمادي قام بنشر ديسمبر 31, 2016 قام بنشر ديسمبر 31, 2016 السلام عليكم و رحمة الله تعالى و بركاته: If DCount("[telephone]", "customers", "[telephone]= Text1 ") = 0 Then MsgBox "هذا الرقم غير موجود" ElseIf DCount("[telephone]", "customers", "[telephone]= Text1 ") = 1 Then DoCmd.SearchForRecord acDataForm, "m_cust", acFirst, "telephone =" & Me.Text1 Else MsgBox "هذا الرقم مكرر" DoCmd.SearchForRecord acDataForm, "m_cust", acFirst, "telephone =" & Me.Text1 End If و هذا هو المرفق الحجز 2016.rar 1
محمود العراقى قام بنشر ديسمبر 31, 2016 الكاتب قام بنشر ديسمبر 31, 2016 منذ ساعه, صالح حمادي said: السلام عليكم و رحمة الله تعالى و بركاته: If DCount("[telephone]", "customers", "[telephone]= Text1 ") = 0 Then MsgBox "هذا الرقم غير موجود" ElseIf DCount("[telephone]", "customers", "[telephone]= Text1 ") = 1 Then DoCmd.SearchForRecord acDataForm, "m_cust", acFirst, "telephone =" & Me.Text1 Else MsgBox "هذا الرقم مكرر" DoCmd.SearchForRecord acDataForm, "m_cust", acFirst, "telephone =" & Me.Text1 End If و هذا هو المرفق الحجز 2016.rar متشكر جدا لحضرتك، هذا ما اردته ولكن هل توجد خاصبة لتصفية البحث فى حالة التكرار، أن يأتى فى النموذج بالبيانات المكررة فقط منذ ساعه, co2002co said: تفضل اخي الفاضل الحجز 2016.rar متشكر جدا لحضرتك
محمود العراقى قام بنشر ديسمبر 31, 2016 الكاتب قام بنشر ديسمبر 31, 2016 اشكر اهتمام حضرتك، أقصد من التصفية انه لو عندى 20 سجل، عند الضغط على خانة البحث أن تتم تصفية نتيجة البحث من 20 سجل، بمعنى إذا كان الرقم مكرر فى السجل رقم 10 والسجل رقم 20 أن يأتى السجلين فقط ولا ياتى بالباقى
co2002co قام بنشر ديسمبر 31, 2016 قام بنشر ديسمبر 31, 2016 هل الكلام موجه لي او للاخ الكريم صالح حمادي
محمود العراقى قام بنشر ديسمبر 31, 2016 الكاتب قام بنشر ديسمبر 31, 2016 متأسف جدأ لحضرتك، أقصد فى تعديل الاستاذ صالح حمادى صالح حمادي
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.