اريد مثال حول ربط جدولين ربطهم ب ComboBox

مغلق

بدأه طارق إبراهيم في 19 مايو 2005 · 2 رد · 1,013 مشاهدة · في Microsoft Visual Basic.NET

#119 مايو 2005 في 06:38 صاحب الموضوع

السلام عليكم

اريد مثال يوضح عملية ال Join لجدولين (Master/Details) بحيث اريد ان يتم تحميل بيانات احدى الجدولين فى ComboBox1 و عندما يتم تغيير قيمة فيه يتم التغيير فى ال ComboBox2

المشكلة ليست انى لا اعرف و لكنى اول مرة اقوم بعملها مع ال ComboBox حيث انى متعود على الداتا جريد و لكن حقيقة هذه المرة يوجد لدى مشكلة بعد تحديد ال DataSource و ال DisplayMember و ملئ الداتا سيت و تحديد ال DataRelation

و فى حدث ال ComboBox1_SelectedIndexChanged

وضعت هذا الكود مثلاً

Dim Row As DataRow
        Dim ChildRow As DataRow

        For Each Row In DS.Tables("Projects").Rows
            ComboBox1.DataSource = DS.Tables(0).DefaultView
            ComboBox1.DisplayMember = "ProjName"
            For Each ChildRow In Row.GetChildRows("FK_Groups_Projects")
                ComboBox2.DataSource = DS.Tables(1).DefaultView
                ComboBox2.DisplayMember = "GroupName"
            Next ChildRow
        Next Row

اعتقد ان لدى خطأ و للاسف لا استطيع وضع المشروع و لكن اريد مثال يوضح المقصود و يفضل لو وضع الكود بين وسمى ال [Code ] و ال [/code ] هنا

Technical Lead Developer

My LinkedIn Profile

اللهم قنى شر الجهل و الجهلاء

( اقْتَرَبَ لِلنَّاسِ حِسَابُهُمْ وَهُمْ فِي غَفْلَةٍ مَّعْرِضُونَ ) {الأنبياء:1}

#219 مايو 2005 في 08:40

Dear Tarig ,

I am using this way ,

The First Combo (Say Projects) you just can set the Properties :

DataSourc To : DS.Projects

DisplayMember To : ProjName

ValueMember To : ProjID ( your primary field)

The Second Combo (Say Groups) also set the Properties :

DataSource To : DS.Groups

DisplayMember : GroName

ValueMember : GroID

Then Fill your DataSet with all Projects list and All Groups list in the Form_Load and you can use a Procedure to filte the next Combo as below

Private Sub filterGroups(ProjID as Int16)
Ds.Groups.DefaultView.RowFilter="ProjID=" & ProjID
End Sub

Then in the Event Projects_SelectedIndexChanged write this Line :

filterGroups(Projects.SelectedValue)

Good Luck

and Sorry for writing English , I will buy another KeyBoard Soooooooon .

#323 مايو 2005 في 23:52

شكراً يا اخ عمار على المساعدة و لكنى قمت بحلها باستخدام ال DataRow اتمنى ان تلقى نظرة على الكود بعد التعديل ;)

اولاً قم بتنفيذ السكربت المسمى MyTables لإنشاء الجداول و من ثم قم بتعديل ال Connection String لتناسبك و لا تنسى ملئ الجداول بالبيانات للتجريب

الكود مكتوب بال VS 2002

MasterDetailComboBox.rar

تم تعديل هذه المشاركة بواسطة طارق إبراهيم في 24 مايو 2005 في 11:23