تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مساعدة في فلتر Combobox
#1
السلام عليكم ورحمة الله وبركاته 

لو سمحتوا تعبت من البحث في المنتديات العربية والانجليزية  Huh


السؤال هو كالتالي :- 

قاعدة البيانات :  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

ساعدوني بلييييز .... 
الرد }}}}
تم الشكر بواسطة:
#2
أخي العزيز بسيطه
( da = New SqlDataAdapter("select * From0000", conn
ds = New DataSet
(da.Fill(ds, "222"
( ComboBox1.DataSource = ds.Tables("111"
ComboBox1.DisplayMember = "111"

ضع في الخانه 0000 أسم قاعدة البيانات
وضع في الخانه 222 أسم الجدول اللي به الدول
111 ضع أسم اللي به المدن
111 ضع أسم الحقل اللي به المدن
الرد }}}}
تم الشكر بواسطة:
#3
شكرا على الرد بس مش عارفه ليه مو راضي يشتغل الكود لما بختار من الكمبو الاول بيكون الكمبو الثاني فاضي  Huh

هذا هو الكود : - ارجوا المساعده 


كود :
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
الرد }}}}
تم الشكر بواسطة:
#4
اختي العزيزة فقط اضيفي هذا الحدث
PHP كود :
   Protected Sub Combobox1_SelectedIndexChanged(ByVal sender As ObjectByVal e As System.EventArgsHandles 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 
الرد }}}}
تم الشكر بواسطة: mona626
#5
شكرا على تفاعلكم معايا بس للأسف لسى بواجه نفس المشكلة 

مش عارفة وين المشكلة  Huh Huh Huh Huh


[url=http://www.up-00.com/][/url]
الرد }}}}
تم الشكر بواسطة:
#6
اسف على هذا الخطأ
هذا هو التصحيح
PHP كود :
Protected Sub Combobox1_SelectedIndexChanged(ByVal sender As ObjectByVal e As System.EventArgsHandles 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 
الرد }}}}
تم الشكر بواسطة: mona626
#7
كمان مو راضي يشتغل Sad..................


طلعلي ايرور  جننتني هالعمليه  Angry Angry



[url=http://www.up-00.com/][/url]
الرد }}}}
تم الشكر بواسطة:
#8
جربي ان تستبدلي السطرين
PHP كود :
ComboBox2.DataSource ds.Tables("Cities")
 
       ComboBox2.DisplayMember "CityName" 
ب السطرين
PHP كود :
       ComboBox2.DisplayMember "CityName"
ComboBox2.DataSource ds.Tables("Cities"
الرد }}}}
تم الشكر بواسطة: mona626
#9
نفس الخطأ  Sad
الرد }}}}
تم الشكر بواسطة:
#10
ارفعي الفورم والداتا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعدة في نقل الصنف من شاشه البحث الي فاتوره الشراء gmailali 3 65 منذ 10 ساعة مضت
آخر رد: مساعدة
  [كود] مساعدة في كود keyDown المبرمج العبقري 2 53 أمس, 01:49 AM
آخر رد: مساعدة
  [VB.NET] مساعدة في بحث CoderMM 0 44 22-01-17, 06:02 PM
آخر رد: CoderMM
  [VB.NET] اخ مساعدة الرجاء النظر الي هذا موضوع 3asfa~mdmra 5 136 21-01-17, 12:33 AM
آخر رد: 3asfa~mdmra
  [VB.NET] مساعدة حول تحيديث بينات جدول من جدول آخر kassa djeffal 1 38 19-01-17, 09:16 PM
آخر رد: ahmed.nabil
  [VB.NET] مساعدة لنشر موقعي safa 1 46 18-01-17, 11:11 AM
آخر رد: أبو عمر
  مساعدة فى انشاء نظام تسجيل و تسحيل الدخول Mohamed20 2 119 15-01-17, 11:48 PM
آخر رد: Mohamed20
  [VB.NET] مساعدة في قراءة داتابيس اكثر من نسخة للبرنامج 0theghost0 9 163 13-01-17, 10:44 AM
آخر رد: 0theghost0
Heart [VB.NET] احتاج الى مساعدة في برنامج لمحل لحساب الفاتورة malek369 0 86 05-01-17, 09:50 AM
آخر رد: malek369
  استفسار حول (ComboBox) و (TextBox). المبرمج المبتدئ 1 10 266 05-01-17, 03:37 AM
آخر رد: المبرمج المبتدئ 1

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


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