تقييم الموضوع :
  • 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 ك ب / التحميلات : 40)
الرد }}}}
تم الشكر بواسطة:
#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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] اريد تصميم فكرة كرت العائلة عمور2016 1 111 02-08-16, 04:41 AM
آخر رد: عمور2016
  [سؤال] استخراج قيم عمود فى تكست بوكس ABO.BANCIANA 2 284 21-02-16, 08:58 PM
آخر رد: ahmedabdelaliem
  [vb6.0] أرجو المساعدة ... الليست بوكس واكثر من اختيار List1.selected k_medhat 6 417 04-02-16, 04:07 AM
آخر رد: gadr
  [سؤال] أضافة سطر جديد فى التيكست بوكس copy77 4 573 27-11-15, 06:36 AM
آخر رد: copy77
  [vb6.0] استفسار اريد غلق Form2 وانهائه chaabane 2 647 01-08-15, 07:22 PM
آخر رد: semmou
  [سؤال] اريد كود لايجاد فاصلة الآلاف Ahmed Gandos 2 467 16-04-15, 12:01 AM
آخر رد: Ahmed Gandos
  اريد كود لفتح ملف بور بوينت امتداده pps layan2000 1 334 05-04-15, 01:51 PM
آخر رد: abulayth
  اداة يتم الكتابة عليها مثل الدتا للجريد magic200100 4 734 02-04-15, 11:18 PM
آخر رد: ahmedabdelaliem
  من فضلكم اريد اداة XP COMMAND BUTTON.OCX الخاصة بي WIN7 64BIT chaabane 3 773 28-02-15, 04:19 PM
آخر رد: InJuries
  [سؤال] اريد تشفير نص Hell Cell 0 262 09-02-15, 01:22 PM
آخر رد: Hell Cell

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


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