ربطت البرنامج مع قاعدة البيانات عن طريق الآداة ADODC
انا مسوي combobox
وعرفته بال ADOSC عن طريق
datasoruce = adodc1
datafield = id
المفروض انه يمتلئ من جدول آخر مربوط بالجدول الأساسي
عن طريق الكود
set rs = new recordset
sql="select * from status"
rs.open sql ,db,2,4
do while not rs.eof
combo1.additem (rs.fields("name").value)
combo1.itemdata(combo1.newindex)=rs.fields("id").value
rs.movenext
loopوفي نفس الوقت عندما يختار المستخدم قيمة منه يتم ادراجة
في الجدول الأساسي عن طريق ال ADODC

