30-09-20, 04:45 AM
في المثال المرفق أتمنى أن يكون هناك طريقة لجلب اسماء ابناء الموظف وعرضها في الكومبو بكس الخاص بهم عند عرض إسم الموظف
انتظر الحلول من الجميع
انتظر الحلول من الجميع
الصفحات : 1 2
30-09-20, 04:45 AM
30-09-20, 07:22 AM
للتوضيح فقط
المطلوب هو أن يظهر ابناء الموظف في الكومبو الأخر عند إختيار الموظف !
المطلوب هو أن يظهر ابناء الموظف في الكومبو الأخر عند إختيار الموظف !
30-09-20, 11:56 AM
بدون ان ارى المثال
بنفس الطريقة التي عبئت بها الكومبو الاول تقوم بتعبئة الثاني
اكيد لديك جدول للابناء وبه حقل انديكس للربط بالاول
الجملة ستكون
select BoyName from ChidTable where ChildIndex=@ChildIndex
وهذه التعبئة طبعا ستكون في الحدث OnChange للكمبو الاول
بنفس الطريقة التي عبئت بها الكومبو الاول تقوم بتعبئة الثاني
اكيد لديك جدول للابناء وبه حقل انديكس للربط بالاول
الجملة ستكون
select BoyName from ChidTable where ChildIndex=@ChildIndex
وهذه التعبئة طبعا ستكون في الحدث OnChange للكمبو الاول
30-09-20, 05:09 PM
(30-09-20, 11:56 AM)ابو محمد محمد محمد كتب : [ -> ]بدون ان ارى المثال
بنفس الطريقة التي عبئت بها الكومبو الاول تقوم بتعبئة الثاني
اكيد لديك جدول للابناء وبه حقل انديكس للربط بالاول
الجملة ستكون
select BoyName from ChidTable where ChildIndex=@ChildIndex
وهذه التعبئة طبعا ستكون في الحدث OnChange للكمبو الاول
ليس هناك جدول للأبناء فالأبناء مضافين بنفس جدول الأب
اتمنى تطلع على المثال لتتوضيح
فجملة البحث يا عزيزي يجب أن تستخرج لي حقل الإبن الأول والإبن الثاني والثالث والرابع وتقوم بتعبئتها في الكومبو الخاص بالأبناء
فكل سطر في الداتا يحتوي سجل أب مع عدد من الأبناء وهكذا
30-09-20, 08:19 PM
30-09-20, 10:02 PM
للأسف يا سعود بارك الله فيك ليس هو المطلوب
والمشكله واضح في المثال المرفق فمع الموظف ابناءة في نفس السجل والسجل موظف اخر وابناءه
والمطلوب عند يتم عرض الموظف الموجود في السجل الأول في الجدول في الكومبو الأول يتم في نفس الوقت تعبئة الكومبو الثاني بأبناءه الموجودين معه في نفس السجل
اعلم أنها معضله ولكن لابد أن لها حل !
والمشكله واضح في المثال المرفق فمع الموظف ابناءة في نفس السجل والسجل موظف اخر وابناءه
والمطلوب عند يتم عرض الموظف الموجود في السجل الأول في الجدول في الكومبو الأول يتم في نفس الوقت تعبئة الكومبو الثاني بأبناءه الموجودين معه في نفس السجل
اعلم أنها معضله ولكن لابد أن لها حل !
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
30-09-20, 11:29 PM
سلمت أناملك يا غالي
بالضبط هذا هو المطلوب حفظك الله
بالضبط هذا هو المطلوب حفظك الله
01-10-20, 01:28 AM
(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
هل من الممكن تطبيق نفس الكود إذا كانت بيانات الإبناء في الجدول مثلا الإسم ورقم الهاتف الإسم ورقم الهاتف فهل من الممكن تعبئة الكومبو بالأسماء فقط دون الأرقام ؟
01-10-20, 02:39 AM
بعد عملية البحث تتم إضافة العناصر إلى الكومبو متتابعة أو متفرقة بهذا الكود وفقا لرقمها في الداتا تيبل!
كود :
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 2