تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود بحث واظهار النتاءج في combo
#1
اريد اظهار نتيجة بحث داخل combo
ارجو التعديل علي الكود
If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient

rs.Open "SELECT * FROM XXX WHERE XXX = '" & Combo1.Text & "'", Adodc1.ConnectionString, 1, 3

Set Combo2.DataSource = rs

Combo2.Clear
If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient

rs.Open "SELECT * FROM XXX WHERE XXX = '" & Combo1.Text & "'", Adodc1.ConnectionString, 1, 3
Set Combo2.DataSource = rs
With rs
Do Until rs.EOF
Combo2.AddItem rs!XXX
rs.MoveNext
Loop
End With

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

يا ريت تضع مشاكاتك لاستفيد انا ايضا منها لانني جديد على البرمجة

مشاركاتك و ليس مشاكاتك
Heartاحبكم في اللهHeart
http://www.vb4arb.com/vb4arb2.gif
الرد }}}
تم الشكر بواسطة:
#3
تحت امرك
الرد }}}
تم الشكر بواسطة:
#4
اخي سوبر انت رائع

يا ريت مثال البحث و تعبئة الكومبو بالبحث لنستفيد ان شاء الله
Heartاحبكم في اللهHeart
http://www.vb4arb.com/vb4arb2.gif
الرد }}}
تم الشكر بواسطة:
#5
في المرفقات


الملفات المرفقة
.rar   test.rar (الحجم : 9.73 ك ب / التحميلات : 130)
الرد }}}
تم الشكر بواسطة: princeofislam
#6
مشكووووووور اخي
Heartاحبكم في اللهHeart
http://www.vb4arb.com/vb4arb2.gif
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل هناك طريقة لجعل اداة combo في خلية flexgrid gonm64 4 1,998 18-10-19, 10:44 PM
آخر رد: gonm64
Question [vb6.0] هل من الممكن ان اشترط على المستخدم إدخال اربعه ارقم في Combo ؟؟ Microformt 1 1,207 15-07-19, 10:01 PM
آخر رد: سعود
Question [vb6.0] كيف امنع المستخدم من كتابة الاحرف والرموز في Combo ؟ Microformt 2 1,683 28-06-19, 03:26 AM
آخر رد: Microformt
  [vb6.0] جلب بيانات من combo وتحديد webbrowser tempman 2 1,895 05-12-18, 01:04 PM
آخر رد: tempman
  [سؤال] كود عدم الكتابة داخل combo box Ahmed Abdulla 11 10,948 18-05-17, 02:05 AM
آخر رد: عبد العزيز البسكري
  [سؤال] اضافة combo لمجموعة البحث وعمل بحث بين تاريخين كنونو 6 3,108 26-11-16, 09:12 PM
آخر رد: Amir_Alzubidy
  [vb6.0] نقل من Combo الي TEXT iisys 10 3,592 26-09-16, 07:56 AM
آخر رد: iisys
Question [vb6.0] كيف اربط Combo.text بحقل الدول الموجود بقاعدة البيانات في برنامجي المرفق ؟؟ Microformt 3 2,303 09-09-16, 04:24 PM
آخر رد: Amir_Alzubidy
  [سؤال] كود لربط combo box مع text box abazrmhamed 4 4,019 24-08-16, 01:08 PM
آخر رد: LoveVb
  ادراج الأسماء داخل combo m-kaylani 2 2,112 18-08-15, 12:12 PM
آخر رد: m-kaylani

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


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