VPF::Как заполнить ComboBox Значениями из DB ?

TOlia-Chainik

Дата 6.10.2004, 18:58 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Как заполнить список ComboBox'a Значениями из определенного поля Data Base ???

ответьте, please, на уровне чаиника
Spasibo
Olia

valex13

Дата 8.10.2004, 05:52 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 243
Регистрация: 29.1.2003
Где: Иркук. область, г . Иркутск

Репутация: 1
Всего: 1

Так же как и в случае заполнения элементов ComboBox из массива. А в массив данные загружай из RecordSet. RecordSet и его методы могут зависеть от конкретной базы данных (ты не привел). Привожу пример подключения к dbf файлу (таблице) имеущей всего отдно поле F_N . Пишу на память. Подключи Referens Microsoft DAO 3.6 Library

Код


 Dim db as Database
  Set db = OpenDatabase("C:\TESTAPP\", False, False, "dBASE iii;")
  Dim rs As Recordset
  Set rs = db.OpenRecordset("select F_N from C:\TEMP\COUNT.DBF")
  for i=1 to rs.RecordCount-1
    ComboBox1.Add ( rs.Field("F_N").Value )
  Next
rs.Close()

Добавлено @ 05:53

Код


Set rs = db.OpenRecordset("select F_N from C:\TESTAPP\COUNT.DBF")

Спасибо создателям сайта за подцветку синтаксиса :-)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »