السلام عليكم ورحمة الله وبركاته
لو سمحتوا تعبت من البحث في المنتديات العربية والانجليزية
السؤال هو كالتالي :-
قاعدة البيانات : SQL Server Management Studio 2012
إسـم قاعدة البيانات : Reporting_System
فيها جدولينا :
الجدول الأول اسمه : الدول . والحقول : CountryID و CountryName
الجدول الثاني فيه : المدن . والحقول : CityID , CityName , CountryID
تم انشاء علاقة بين الجدولين :
[url=http://www.up-00.com/][/url]
صممت الفورم وتم الاتصال بقاعدة البيانات بنجاح لكن المشكلة كالتالي :
لدي عدد 2 Combobox
Combobox 1 = Countries
Combobox 2 = Cities
أريد ربط الكمبوبوكس 1 مع الكمبوبوكس 2 بحيث لما اختار الدوله في الكمبوبوكس 1 تظهرلي المدن الي فالدولة فقط
هل يوجد كود معين للفيجوال استوديو 2012
ساعدوني بلييييز ....
شكرا على الرد بس مش عارفه ليه مو راضي يشتغل الكود لما بختار من الكمبو الاول بيكون الكمبو الثاني فاضي
هذا هو الكود : - ارجوا المساعده
كود :
Dim con As New SqlConnection
Dim comm As SqlCommand = New SqlCommand
Dim reader As SqlDataReader
Dim dt As New DataTable
Dim ds As New DataSet
Dim da As New SqlDataAdapter
Private Sub dailyreportentryform_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.TextBox8.Text = loginform.TextBox3.Text
Me.TextBox9.Text = loginform.TextBox1.Text
TextBox10.Text = Format(Date.Now, "dd/MM/yyyy")
DateTimePicker1.Format = DateTimePickerFormat.Custom
DateTimePicker1.CustomFormat = "dd/MM/yyyy"
con = New SqlConnection
con.ConnectionString = "server=.\sqlexpress; database= Reporting_System; integrated security=true"
con.Open()
fillcombo1()
fillcombo2()
MsgBox("تم الاتصال بنجاح", MsgBoxStyle.Information)
End Sub
'لتعبئة الكمبوبوكس الأول
Private Sub fillcombo1()
ds = New DataSet
da = New SqlDataAdapter(" select * from Countries", con)
da.Fill(ds, "Countries")
ComboBox1.DataSource = ds.Tables("Countries")
ComboBox1.ValueMember = "CountryID"
ComboBox1.DisplayMember = "CountryName"
End Sub
'لتعبئة الكمبوبوكس الثاني
Private Sub fillcombo2()
ds = New DataSet
da = New SqlDataAdapter(" select * from Cities", con)
da.Fill(ds, "Cities")
ComboBox2.DataSource = ds.Tables("Cities")
ComboBox2.ValueMember = "CityID"
ComboBox2.DisplayMember = "CityName"
End Sub
'لفلترت الكمبوبوكس الثاني بحيث تظهر المدن بحسب الدوله التي اختارتها في الكمبوبوكس الأول
da = New SqlDataAdapter("select * From Cities", con)
ds = New DataSet
da.Fill(ds, "Countrie")
ComboBox2.DataSource = ds.Tables("Cities")
ComboBox2.DisplayMember = "CityName"
End Sub
اختي العزيزة فقط اضيفي هذا الحدث
PHP كود :
Protected Sub Combobox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Combobox1.SelectedIndexChanged
da = New SqlDataAdapter("select * From Cities Where CountryID=" val(Combobox1.SelectedValue) , con)
ds = New DataSet
da.Fill(ds, "Countrie")
ComboBox2.DataSource = ds.Tables("Cities")
ComboBox2.DisplayMember = "CityName"
End Sub
شكرا على تفاعلكم معايا بس للأسف لسى بواجه نفس المشكلة
[url=http://www.up-00.com/][/url]
كمان مو راضي يشتغل
..................
طلعلي ايرور جننتني هالعمليه
[url=http://www.up-00.com/][/url]
الفورم في المرفقات لكن الداتا مش عارفه ارفعها