Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   [решено] dbList и dbcombo как подключиться (http://forum.oszone.net/showthread.php?t=336663)

artemu88 13-09-2018 12:20 2831145

dbList и dbcombo как подключиться
 
как подключиться напрямую к бд, чтобы был только один элемент управления dbList или dbcombo без файла бд (Data 1, Data2 со стрелочками).
Можно ли как то это написать в коде? Есть какие-нибудь книги или сайты по этой теме? Буду благодарен за помощь!

Iska 13-09-2018 13:27 2831166

Не очень понятен Ваш вопрос.

artemu88 13-09-2018 13:49 2831168

Вложений: 1
я имел ввиду, чтобы значения из бд были dbList или dbcombo без значка на форме, который используется для работы с данными бд (Data 1, Data2 со стрелочками) - он на скриншоте

Iska 13-09-2018 14:10 2831174

artemu88, я не знаю, что Вы имеете в виду под:
Цитата:

Цитата artemu88
были dbList или dbcombo »

но ничто не мешает работать с базой данных без каких-либо документов ActiveX, размещённых в контейнере формы, будь то DAO, будь ADO.

Можете начать с простого:
13. Применение ADO и работа с базами данных
9. Работа с базами данных и применение объектной модели ADO.

artemu88 13-09-2018 16:04 2831204

я хотел бы узнать как реализовать это в visual basic 6 а не в vba, прошу прощения если не так выразился

Iska 13-09-2018 16:17 2831209

artemu88, точно так же.

artemu88 20-09-2018 14:00 2832235

Вложений: 1
вот создал проект подключения к бд BIBLIO.mdb с кнопкой для добавления значений в dbList, но к сожалению ничего не отображает. Что я делаю не так?

Iska 20-09-2018 18:32 2832251

artemu88, всё не так в двух последних строчках:
Код:

cn = DBList1.DataSource
rs = DBList1.ListField


artemu88 21-09-2018 08:30 2832335

если по-другому
DBList1.DataSource = cn
DBList1.ListField = rs
то тоже ничего не дает, в чем ошибка, подскажите по возможности. Спасибо!

artemu88 21-09-2018 11:11 2832367

Вложений: 1
  • бд.rar (838 bytes, скачиваний: 11)
Вот подправил, но без последних строчек, ставлю DBList1.DataSource = rs, пишет method or data member not found

artemu88 21-09-2018 12:59 2832376

Немного доработал код, но все равно ничего нет в листе

Set rs = New adodb.Recordset
rs.Open "SELECT Au_id FROM Authors ", cn
Set DataList1.RowSource = rs
DataList1.ListField = "Au_id"

Iska 21-09-2018 16:24 2832400

Цитата:

Цитата artemu88
ставлю DBList1.DataSource = rs, пишет method or data member not found »

DBList binding... - Xtreme Visual Basic Talk

artemu88 21-09-2018 16:38 2832405

Option Explicit
Dim cn As adodb.Connection, rs As adodb.Recordset, SQL As String
..................
Set rs = New adodb.Recordset
SQL = "SELECT Author FROM Authors "
rs.Open SQL, cn, adOpenStatic, adLockReadOnly
Set DataList1.RowSource = rs
DataList1.ListField = "Author"
End Sub
И ВСЕ ПОЛУЧИЛОСЬ! СПАСИБО!!


Время: 23:11.

Время: 23:11.
© OSzone.net 2001-