تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة ملي كمبوبوكس من اخر علي اساس شرط فى كمبوبوكس اخر
#1
السلام عليكم
كيف اقوم بتعبئة كمبوبوكس من شرط في كمبوبوكس اخر
الاول خاص بالمعاهد
اما الثاني خاص بالمدرسين
قمت بكتابة الكود التالي
PHP كود :
Private Sub cmbSchools_SelectedIndexChanged(sender As ObjectAs EventArgsHandles cmbSchools.SelectedIndexChanged
        Try
            daemp 
= New SqlDataAdapter("SELECT * FROM emp INNER JOIN School on School_id_emp = " cmbSchools.SelectedValuecon)
 
           ConnectDb()
 
           ds = New DataSet
            daemp
.Fill(ds"emp")
 
           If daemp.SelectCommand.ExecuteScalar() Is DBNull.Value Then
                ComboBox1
.Text ""
 
           Else
                ComboBox1
.DataSource ds.Tables("emp")
 
               ComboBox1.ValueMember "emp_id1"
 
               ComboBox1.DisplayMember "emp_name"
 
           End If
 
       Catch ex As Exception
            MessageBox
.Show(ex.Message)
 
       End Try


   End Sub 





فكانت النتيجة كالتالي


تظهر هذه الرسالة مرتين ثم تظهر النافذة وفيها خطا تكرار الاسم اكثر من مرة في كمبوبوكس الموظفين اريد الموظف الذي يعمل فى المعهد فقط



ارجوا المساعدة ولكم جزيل الشكر
الرد
تم الشكر بواسطة:
#2
السلام عليكم

لم تضعي لي نسخة من بيانات قاعدة البيانات في الموضوع السابق، في حين بدأت بالتعديل على المشروع السابق، ولكن كأني أشاهد هنا اختلاف.

اول عدلي انواع البيانات في قاعدة البيانات من nchar الى nvarchar
ثانيا استخدمي الترقيم التلقائي في عمود id غير باستثناء عمود serial

وهذه صور بعض التعديلات

   

   


أنتظر منك وضع المشروع الكامل الذي لديك للإقتباس منه وعمل التعديلات.

كما ترين هناك اختلاف بالمسميات عندما كتبت (المورد) ولكن الواضح من خلال الصورة في هذا الموضوع أنه (المعهد)
الرد
تم الشكر بواسطة:
#3
اشكرك ياستاذ مساعدة علي سرعة تجاوبك واتمني من حضرتك اني ارسلك على الخاص وحتي الان نفس المشاكل السابقة وقمت بعمل التعديلات على قاعدة البيانات
وبحمد لله قمت بعمل تعديل علي كود الكمبوبوكس ولا يوجد اخطاء لكن حتي الان هناك تكرار في كمبوبوكس الموظفين 
وهذا الكود للافادة
PHP كود :
  Public Sub fillcombo(ByVal combo As ComboBoxByVal query As StringByVal displayMember As StringByVal valuMember As String)
 
       cmd = New SqlCommand(querycon)
 
       adapter = New SqlDataAdapter(cmd)
 
       table = New DataTable()
 
       adapter.Fill(table)
 
       combo.DataSource table
        combo
.DisplayMember displayMember
        combo
.ValueMember valuMember
    End Sub 
PHP كود :
Private Sub cmbSchools_SelectedIndexChanged(sender As ObjectAs EventArgsHandles cmbSchools.SelectedIndexChanged
        Dim val 
As Integer 0
        Int32
.TryParse(cmbSchools.SelectedValue.ToString(), val)
 
       Dim query As String "SELECT * FROM emp INNER Join School ON emp.School_id_emp = " val
        fillcombo
(ComboBox1query"emp_name""emp_id1")
 
   End Sub 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة تكرار الامر تلقائيا | حل مشكلة script error في webbrowser عند فتح صفحة ما soloxocf1 6 274 18-03-19, 09:16 AM
آخر رد: 5000
  مشكلة فى تحزيم البرنامج ؟ احمد خطاب 1 75 15-03-19, 08:18 PM
آخر رد: 5000
  مشكلة في إضافة الصنف بالباركود في الفاتورة Hamoody 3 108 12-03-19, 06:44 PM
آخر رد: elgokr
  حل مشكلة حاتمي 1 68 09-03-19, 07:31 PM
آخر رد: حريف برمجة
  [VB.NET] مشكلة تظهر عند تنصيب فيجوال ستوديو 2019 اباذر 3 130 09-03-19, 12:41 AM
آخر رد: اباذر
  [VB.NET] مشكلة Data Type Mismatch in criteria expression basboos95 3 160 01-03-19, 04:19 PM
آخر رد: elgokr
  [VB.NET] مشكلة فى عرض محتويات DataGridView فى TextBox mr_hso 9 307 26-02-19, 09:18 PM
آخر رد: mr_hso
  مشكلة في تصدير الداتا الى PDF alshandodi 3 129 22-02-19, 07:58 PM
آخر رد: elgokr
Photo مشكلة في تسطيب كريستال ريبورت عند العميل صالح حمادي 4 159 21-02-19, 01:34 PM
آخر رد: elgokr
  مشكلة كود استيراد ملف اكسيل يقراء لغة واحدة فقط new_programer 4 125 18-02-19, 02:04 AM
آخر رد: new_programer

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


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