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


انا وصعت هذ الكود لكنه يقوم بملى عنصر واحد من الحقل فقط والحقل فيه 7 عناصر


كود :
On Error Resume Next: Err.Clear

SQLs = "select NFacture from sto where Fournisseur='" & Text1.Text & "'"

If cc.State = adStateOpen Then cc.Close
cc.Open SQLs, CN, adOpenDynamic, adLockOptimistic

   Set DataGrid1.DataSource = cc
  
Combo2.AddItem cc![NFacture]

المثال في المرفقات


الملفات المرفقة
.rar   ttt.rar (الحجم : 9.83 ك ب / التحميلات : 57)
الرد }}}}
تم الشكر بواسطة:
#2
اخي الكريم..

انت بحاجه إلى استخدام الامر for

كود :
On Error Resume Next: Err.Clear

SQLs = "select NFacture from sto where Fournisseur='" & Text1.Text & "'"

If cc.State = adStateOpen Then cc.Close
cc.Open SQLs, CN, adOpenDynamic, adLockOptimistic

   Set DataGrid1.DataSource = cc
for i=0 to cc.recoredcount -1  
Combo2.AddItem cc![NFacture]
cc.movenext
next
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Photo [vb6.0] اريد لو تكرمتو برنامج او مثبت داتا ريبورتdatareport ؟ amer2000 2 128 06-08-17, 07:57 AM
آخر رد: sendbad100
  اريد المساعدة في عمل برنامج مواقيت الصلاة نوراني 1 175 03-05-17, 09:34 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] اريد تصميم فكرة كرت العائلة عمور2016 1 304 02-08-16, 04:41 AM
آخر رد: عمور2016
  [سؤال] استخراج قيم عمود فى تكست بوكس ABO.BANCIANA 2 559 21-02-16, 08:58 PM
آخر رد: ahmedabdelaliem
  [vb6.0] أرجو المساعدة ... الليست بوكس واكثر من اختيار List1.selected k_medhat 6 836 04-02-16, 04:07 AM
آخر رد: gadr
  [سؤال] أضافة سطر جديد فى التيكست بوكس copy77 4 893 27-11-15, 06:36 AM
آخر رد: copy77
  [vb6.0] استفسار اريد غلق Form2 وانهائه chaabane 2 948 01-08-15, 07:22 PM
آخر رد: semmou
  [سؤال] اريد كود لايجاد فاصلة الآلاف Ahmed Gandos 2 686 16-04-15, 12:01 AM
آخر رد: Ahmed Gandos
  اريد كود لفتح ملف بور بوينت امتداده pps layan2000 1 516 05-04-15, 01:51 PM
آخر رد: abulayth
  اداة يتم الكتابة عليها مثل الدتا للجريد magic200100 4 977 02-04-15, 11:18 PM
آخر رد: ahmedabdelaliem

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


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