ورود

View Full Version : سوال: ساخت کمبو باکس دیتابیس



maskan_1361
دوشنبه 01 خرداد 1391, 10:49 صبح
با سلام

جگونه می توان کمبوباکس را به دیتابیس ارتباط داد به نحوی که ایتم هایش را از دیتابیس بخواند
من از طریق کنترل دیتا و کمبوباکس و ارتباط دادن این دو به هم نتوانستم این کار را انجام بدهم و هیچ ایتمی به کمبوباکس اضافه نشد.

با تشکر

Veteran
دوشنبه 01 خرداد 1391, 12:19 عصر
Adodc1.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\db.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from Table1"
Adodc1.Refresh
For i = 1 To Adodc1.Recordset.RecordCount
Combo1.AddItem Adodc1.Recordset.Fields("fname")
Adodc1.Recordset.MoveNext
Next

سلام.

پروزه هم گذاشتم
موفق باشید.

maskan_1361
دوشنبه 01 خرداد 1391, 23:23 عصر
دوست عزیز Veteran (http://barnamenevis.org/member.php?160830-Veteran)
واقعا لطف کردی ممنونم

SlowCode
دوشنبه 01 خرداد 1391, 23:45 عصر
Adodc1.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\db.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from Table1"
Adodc1.Refresh
For i = 1 To Adodc1.Recordset.RecordCount
Combo1.AddItem Adodc1.Recordset.Fields("fname")
Adodc1.Recordset.MoveNext
Next

سلام.

پروزه هم گذاشتم
موفق باشید.

دوست عزیز نیازی به این کار نیست، از لیست کامپوننت ها microsoft data bound list رو تیک بزن بعد DBcombo رو انتخاب کن.
حالا خاصیت های listfield و rowsource رو تنظیم کن.