تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تعديل كود البحث في حقل معين وإظهار النتيجة في الكومبو بوكس
#1
السلام عليكم

أريد التعديل على هذا الكود
هذا الكود يقوم بجلب جميع البيانات الموجودة في الحقل it2 بشرط po2 يساوي false
وإظهار النتيجة في combobox وهو شغال تمام
أريد التعديل عليه بحيث يقوم بفرز البيانات في الحقلit2 ولا يظهر تكرار البيانات
مثلا الحقل it2 موجود فيه 5 بيانات هي احمد ، محمد ، احمد ، علي ، خالد
تكون النتيجة احمد ، محمد ، على ، خالد
PHP كود :
Dim cnStr As StringcmdText As String

        SQLstr 
"SELECT  it2 FROM mate WHERE po2 = False" 

 
       newConnection.Open()
 
       Dim DataAdapter1 As New OleDbDataAdapter(SQLstrnewConnection)
 
       DataAdapter1.Fill(DataSet1"pym")
 
       newConnection.Close()

 
       Dim i As Integer
        For i 
0 To DataSet1.Tables("pym").Rows.Count 1
            ComboBox1
.Items.Insert(iDataSet1.Tables("pym").Rows(i).Item("pna3"))
 
       Next 
الرد
تم الشكر بواسطة:
#2
تم إيجاد الحل ، آسف على إزعاجكم
تم وضع كلمة DISTINCT بعد كلمة SELECT
PHP كود :
SQLstr "SELECT DISTINCT it2 FROM mate WHERE po2 = False" 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعده شباب اريد تعديل الكود يشتغل عليDataGridView بدل ListView -اين المحترفين Fransesco 3 33 منذ 2 ساعة مضت
آخر رد: elgokr
  [VB.NET] الفلترة ضمن الليست بوكس EMADSSS 2 71 أمس, 12:50 AM
آخر رد: EMADSSS
  [كود] طريقة البحث عن صورة في قاعدة البيانات access باستعمال صورة أخرى technomedia 6 99 20-02-19, 04:01 PM
آخر رد: elgokr
  هل البرنامج له عدد معين من الفورم Emam emam 10 175 19-02-19, 07:09 PM
آخر رد: حريف برمجة
  تعبئة الليست بوكس عند الإختيار من الكومبوكس مصمم هاوي 1 49 16-02-19, 03:09 AM
آخر رد: أحمد النجار
Information [VB.NET] بحاجة الى اكواد الاضافة و الحذف و التعديل و البحث .. georgos 7 197 15-02-19, 10:52 AM
آخر رد: georgos
  كيف كتابة الارقام العشرية فى التسكت بوكس سمير جمال 0 49 13-02-19, 06:39 PM
آخر رد: سمير جمال
  مشكلة كود البحث بين تاريخين احمد129 12 321 11-02-19, 07:56 PM
آخر رد: princelovelorn
  جلب احد الاسطر من التكست بوكس anes 3 116 10-02-19, 08:43 PM
آخر رد: fouadhdfouad
  [VB.NET] استبدال رمز معين بسطر جديد waelalmsry75 2 72 07-02-19, 02:57 PM
آخر رد: waelalmsry75

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


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