كيف أملأ الكومبو بوكس بالبيانات من الداتا بيز ؟!

[alresalah]

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

أخواني الكرام لو سمحتم لدي سؤال في الفيجوال بيسك الإصدار 6.0

وهو : عندي كومبو بوكس وأريد أن يأخذ البيانات من قاعدة البيانات ويعرضهم في الكومبو بوكس

توضيح : عندي جدول اسمه Student وفيه حقل واحد وهو Name ( اسم الطالب )

أبي في الكومبو بوكس لمن اشغط عليها يعرض لي الأسماء ( اسماء الطلاب ) الموجودة في الداتا بيز ..

أرجو اتضحت الفكرة ؟

أرجو شرحها بالصور ... وأريد أن تكون عملية الربط بالكود ( جملة SQL )

أنتظر ردكم ومساعدتكم لي

بارك الله فيكم

[Ahmed_ghanam]

لو اكسس انت روح على الكمبوبكس
وبعدين فى الشلاشه اللى انت تبرط المبوبوكش فيها مع الداتا بيس هتنزل تحت هتلاقى كلمه RowSource تحط فيها اسم الداتا بيس وبعدين List Field تحط فيها اسم الحقل وكدة ميه ميه دة فى الاكسيس لانى لسه هدرس الsql

[alresalah]

شكرا لك اخي الكريم

لكن أنا هذه الطريقة اعرفها وأنا ذكرت في السؤال أني أريدها بالكود ( Sql )

شكرا لك ولمرورك بالموضوع

أرجو من المشرفين المساعده

[يــس]

Public db As Database
Public rs As Recordset
Public req As String
Public row As Integer

Dim Mabase As String
Mabase = App.Path & "\Base.mdb"
Set db = OpenDatabase(Mabase)

req = "select * from Student"
Set rs = db.OpenRecordset(req)
With rs
While Not .EOF
comboStudent.AddItem (!Name)
.MoveNext
Wend
End With
comboStudent= comboStudent.List(0)حاول أن تضع الأسماء الصحيحة لقاعدة البيانات و الكومبو بوكس
بالتوفيق