الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

لدى مشكلة فى الكومبو بوكس

بدأه sara gham في 13 يونيو 2012 · 2 رد · 832 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

لدى مشكلة فى ربط الكومبو مع قاعدة بيانات

لدى COMBO 1 , COMBO 2 , COMBO 3

اريد ربط الكومبو 1 بجدول بحيث كل خيار من الكومبو 1 تظهر على اساسها احد الجداول فى الكومبو 2 ....

قمت بكتابة كود لاظهار الجدول الاساسى فى الكومبو 1

وهو كالاتى 

If rs.State = 1 Then rs.Close

rs.Open "select Distinct Knowledge from tasneff1", DB, adOpenStatic, adLockPessimistic

    Combo1.Clear
    rs.MoveFirst
    For rec = 0 To rs.RecordCount
        Combo1.AddItem ("rs!Knowledge")
'        rs.MoveNext
    Next rec
   Combo1.ListIndex = 0

لكن المشلة انه عندى تشغيل البرنامج ..... فى كل مرة يظهر لى شى مختلف

احيانا يظهر القائمة كلها rs!Knowledge

rs!Knowledge

rs!Knowledge

rs!Knowledge

على حسب عدد السجلات

واحيانا تظهر لى القائمة الاساسيةمبتدئة بى السجل رقم 4 ولكن اخر سجل يظهر rs!Knowledge هدا واحيانا لا يظهر شى لم اعرف المشكلة

اررجو المساعدة

#2

والمشكلة الاخرا هى عندما اقوم بتشغيل امر

RS.MOVENEXT

يخرج لى ايرور على هدا الامر ويوقف التشعيل

#3

السلام عليكم

اولا لديك مشكلة في كتابة كود تعبئة COMBO

1 - اسم الحقل لايوضع بين علامات تنصيص ان كنت تستخدم هذه الطريقة

2 - عندما وضعت كود التعبئة 

        Combo1.AddItem rs!Knowledge

في حلقة FOR فان الحلقة ستنتهي بحسب عدد الحقول تمام .. ولكن اين الامر الذي يجعل المؤشر ينتقل الي السجل التالي واقصد هنا الامر MoveNext

تصحيح الكود 

 If rs.State = 1 Then rs.Close

rs.Open "select Distinct Knowledge from tasneff1", DB, adOpenStatic, adLockPessimistic

    Combo1.Clear

   Do While Not rs.EOF
        Combo1.AddItem rs!Knowledge
        rs.MoveNext
    Loop

بالتوفيق

"نحن لا نستسلم... ننتصر أو نموت.... وهذه ليست النهاية... بل سيكون عليكم أن تحاربوا الجيل القادم والاجيال التي تليه... اما أنا... فإن عمري سيكون أطول من عمر شانقي."

عمر المختار

اللهم انعم على بلادي بالأمن والأمان

مواضيع مشابهة