التعامل مع combo و sql

السلام عليكم

قومي بربط textbox1 بالحقل الذي تريدين اضافة بياناته للcombo و ذلك عن طريق الاداة data1

اضيفي command به الكود التالي

data1.recordset.movelast
x=data1.recordset.recordcount
data1.recordset.movefirst

combo.additem (text1.text)

for i=2 to x
data1.recordset.movenext
combo.additem (text1.text)
next

الأخت الكريمة أم تسنيم

قد قام بالرد عليك الأخ هشام ناصر ولكن ما فهمته من سؤالك انك لا تريدي كل بيانات الحقل ان تظهر في الكمبو بكس يعني تريدي بعض البيانات التي تحقق شروط معينة

و هذا يبدو من سؤالك عن استعمال جملة select

بصورة عامة تعبئة الكمبو بكس لا دخل لها بالاستعلامات يعني انها ممكن أن تتم بإستعلامات أو بأي طريقة أخري

لإضافة أي عنصر للكمبو بكس يستعمل الأمر

(combo.additem (text1.text

كما أوضح لك الأخ هشام حيث text1.text أي نص أو عدد

و لكي تقومي بتعبئة كمبو بكس ببيانات من جدول بشروط معينة عليك استخدام الاستعلامات بجملة select

بنفس الطريقة التي أوضحها لك هشام لكن تضيفي الأمر التالي في الفورم لود

_data1.recordsource="select field1,field2 from table where field1

"&text2.text&"=

مع تغيير اسم الجدول و اسماء الحقول بالاسماء الحقيقية

هذا مثال لعمل استعلام بشرط واحد وإذا كان لديك عدة شروط يمكنك اضافتها للاستعلام

بنفس الطريقة

هذا والله أعلم