تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تعبئة الكومبو بالبحث المتعدد
#1
في المثال المرفق أتمنى أن يكون هناك طريقة لجلب اسماء ابناء الموظف وعرضها في الكومبو بكس الخاص بهم عند عرض إسم الموظف
انتظر الحلول من الجميع


الملفات المرفقة
.rar   EmploeData.rar (الحجم : 74.48 ك ب / التحميلات : 19)
الرد
تم الشكر بواسطة:
#2
للتوضيح فقط
المطلوب هو أن يظهر ابناء الموظف في الكومبو الأخر عند إختيار الموظف !
الرد
تم الشكر بواسطة:
#3
بدون ان ارى المثال
بنفس الطريقة التي عبئت بها الكومبو الاول تقوم بتعبئة الثاني
اكيد لديك جدول للابناء وبه حقل انديكس للربط بالاول
الجملة ستكون

select BoyName from ChidTable where ChildIndex=@ChildIndex

وهذه التعبئة طبعا ستكون في الحدث OnChange للكمبو الاول
الرد
تم الشكر بواسطة:
#4
(30-09-20, 11:56 AM)ابو محمد محمد محمد كتب : بدون ان ارى المثال
بنفس الطريقة التي عبئت بها الكومبو الاول تقوم بتعبئة الثاني
اكيد لديك جدول للابناء وبه حقل انديكس للربط بالاول
الجملة ستكون

select  BoyName from ChidTable where  ChildIndex=@ChildIndex

وهذه التعبئة طبعا ستكون في الحدث OnChange للكمبو الاول

ليس هناك جدول للأبناء فالأبناء مضافين بنفس جدول الأب 
اتمنى تطلع على المثال لتتوضيح 
فجملة البحث يا عزيزي يجب أن تستخرج لي حقل الإبن الأول والإبن الثاني والثالث والرابع وتقوم بتعبئتها في الكومبو الخاص بالأبناء
فكل سطر في الداتا يحتوي سجل أب مع عدد من الأبناء وهكذا
الرد
تم الشكر بواسطة:
#5
أرجو ان يكون التالي هو المطلوب


[صورة مرفقة: vvv.png]
الرد
تم الشكر بواسطة: ZaerAllail
#6
للأسف يا سعود بارك الله فيك ليس هو المطلوب
والمشكله واضح في المثال المرفق فمع الموظف ابناءة في نفس السجل والسجل موظف اخر وابناءه
والمطلوب عند يتم عرض الموظف الموجود في السجل الأول في الجدول في الكومبو الأول يتم في نفس الوقت تعبئة الكومبو الثاني بأبناءه الموجودين معه في نفس السجل

اعلم أنها معضله ولكن لابد أن لها حل !
الرد
تم الشكر بواسطة: سعود
#7
(30-09-20, 10:02 PM)ZaerAllail كتب : للأسف يا سعود بارك الله فيك ليس هو المطلوب
والمشكله واضح في المثال المرفق فمع الموظف ابناءة في نفس السجل والسجل موظف اخر وابناءه
والمطلوب عند يتم عرض الموظف الموجود في السجل الأول في الجدول في الكومبو الأول يتم في نفس الوقت تعبئة الكومبو الثاني بأبناءه الموجودين معه في نفس السجل

اعلم أنها معضله ولكن لابد أن لها حل !

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

PHP كود :
 If EmpCbBx.SelectedIndex = -1 Then Exit Sub
        EmpNoLp
.Text EmpData(EmpCbBx.SelectedIndex)(0)

 
       SonsCmbBox.Items.Clear()

 
       Dim m As Integer
        For m 
2 To EmpData.Columns.Count 1
            SonsCmbBox
.Items.Add(EmpData.Rows(EmpCbBx.SelectedIndex).Item(m).ToString)


 
       Next 
طبقت التعديل على مثالك وعمل بشكل جيد.
[صورة مرفقة: vvv.png]
الرد
تم الشكر بواسطة: ZaerAllail , ZaerAllail , عبد العزيز البسكري
#8
سلمت أناملك يا غالي
بالضبط هذا هو المطلوب حفظك الله
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#9
(30-09-20, 10:06 PM)سعود كتب :
(30-09-20, 10:02 PM)ZaerAllail كتب : للأسف يا سعود بارك الله فيك ليس هو المطلوب
والمشكله واضح في المثال المرفق فمع الموظف ابناءة في نفس السجل والسجل موظف اخر وابناءه
والمطلوب عند يتم عرض الموظف الموجود في السجل الأول في الجدول في الكومبو الأول يتم في نفس الوقت تعبئة الكومبو الثاني بأبناءه الموجودين معه في نفس السجل

اعلم أنها معضله ولكن لابد أن لها حل !

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

PHP كود :
 If EmpCbBx.SelectedIndex = -1 Then Exit Sub
        EmpNoLp
.Text EmpData(EmpCbBx.SelectedIndex)(0)

 
       SonsCmbBox.Items.Clear()

 
       Dim m As Integer
        For m 
2 To EmpData.Columns.Count 1
            SonsCmbBox
.Items.Add(EmpData.Rows(EmpCbBx.SelectedIndex).Item(m).ToString)


 
       Next 
طبقت التعديل على مثالك وعمل بشكل جيد.

هل من الممكن تطبيق نفس الكود إذا كانت بيانات الإبناء في الجدول مثلا الإسم ورقم الهاتف الإسم ورقم الهاتف فهل من الممكن تعبئة الكومبو بالأسماء فقط دون الأرقام ؟
الرد
تم الشكر بواسطة:
#10
بعد عملية البحث تتم إضافة العناصر إلى الكومبو متتابعة أو متفرقة بهذا الكود وفقا لرقمها في الداتا تيبل!

كود :
       SonsCmbBox.Items.Clear()
       Dim r As DataRow
       For Each r In SonsCmbBox.Rows
           SonsCmbBox.Items.Add(r(3).ToString)
           SonsCmbBox.Items.Add(r(5).ToString)
           SonsCmbBox.Items.Add(r(7).ToString)
           SonsCmbBox.Items.Add(r(9).ToString)
       Next
الرد
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم