Заполнение Combobox

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Ninka
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 17.11.2005 (Чт) 14:26

Заполнение Combobox

Сообщение Ninka » 17.11.2005 (Чт) 14:32

Нужно заполнить сей контроль данными из таблицы БД, работаю через DED, и как потом достучаться до до id записи.
Помогите кто чем может.
ЗЫ может тут другой контрол нужен?

GB826
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 312
Зарегистрирован: 04.08.2005 (Чт) 0:58
Откуда: Планета #3

Сообщение GB826 » 17.11.2005 (Чт) 15:33

В ItemData ComboBoxa кидаешь ID , В List то что будет выбираться...

С Дедом к сожалению(а может и радости) не работал... (даже не слышал :oops: )
Пора уже всем хорошим людям собраться и убить всех плохих людей.

Ninka
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 17.11.2005 (Чт) 14:26

Сообщение Ninka » 17.11.2005 (Чт) 17:17

Ежели сработает, то спасибки :D . А DED прикольная штука

CORBA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 179
Зарегистрирован: 22.11.2003 (Сб) 13:41
Откуда: Ukraine-Crimea-Feodosia

Сообщение CORBA » 20.11.2005 (Вс) 14:02

Код: Выделить всё

Adodc1.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\test.mdb;Persist Security Info=False"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select Ãðóïïà, Íàèìåíîâàíèå from Ïåðå÷åíü" ' òåêñò çàïðîñà
Adodc1.Refresh

Do While Not (Adodc1.Recordset.EOF)

Combo1.AddItem Adodc1.Recordset.Fields(1), Adodc1.Recordset.Fields(0)

Adodc1.Recordset.MoveNext
Loop
'Пример для ADO но смысл тотже
 

Вроде так, но вот я только не могу понять почему ошибку на втором параметре combo1.additem
У каждой сложной задачи есть множество простых для понимания, но неправильных решений.

CORBA
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 179
Зарегистрирован: 22.11.2003 (Сб) 13:41
Откуда: Ukraine-Crimea-Feodosia

Сообщение CORBA » 20.11.2005 (Вс) 16:03

Админ,
Почему эту строку форум неправильно интерпритировал?
Adodc1.RecordSource = "select Ãðóïïà, Íàèìåíîâàíèå from Ïåðå÷åíü"
Мне кажется это надо исправить.
У каждой сложной задачи есть множество простых для понимания, но неправильных решений.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: YaCy [Bot] и гости: 126

    TopList