Страница: 1 |
Вопрос: Открытие и Чтение информации из разных баз данных | Добавлено: 21.12.10 00:02 |
Автор вопроса: ![]() |
Здравствуйте. У меня следующая проблема.
Имеется на форме listbox и textbox-ы, а так же уже готовая база данных с 2 таблицами (*.mdb) После загрузки, в список добавляются названия имеющихся таблиц в базе. Щёлкаем на название и в текстовые поля выводится информация. Но выводится данные только с той таблицы, которая стоит в свойстве (не в коде) RecordSource объекта Data. Если убрать название одной из таблиц из свойства, то программа вообще перестаёт работать, несмотря на написанный код, т.е. не видит RecordSource. Помогите разобраться. Заранее спасибо. ************************************** И если кто знает, не могли бы подсказать, как на основе этой программы сделать тоже самое, только загружать данные не из таблиц, а из разных уже созданных баз данных. Там такой же косяк, что когда задаёшь свойство DatabaseName и указываешь одну из баз не в коде - программа выводит информацию только с той базы, которая заданна и не реагирует на код. Если прописываю программно: Data1.RecordSource = "date_table" Data1.DatabaseName = data_name Программа перестаёт работать тоже. Надеюсь с вашей помощью найду ответы. Dim data_name As String Private Sub Form_Load() List1.AddItem "Data_test" List1.AddItem "Data_test1" End Sub Private Sub loading() Data1.RecordSource = data_name Data1.DatabaseName = "data.mdb" Text1.DataField = "Number" Text2.DataField = "Question" Text3.DataField = "Answer1" Text4.DataField = "Answer2" Text5.DataField = "Answer3" Text6.DataField = "Answer4" Text7.DataField = "Ball1" Text8.DataField = "Ball2" Text9.DataField = "Ball3" Text10.DataField = "Ball4" End Sub |
Ответы | Всего ответов: 2 |
Номер ответа: 1 Автор ответа: ![]() ![]() Вопросов: 1 Ответов: 1 |
Профиль | Цитата | #1 | Добавлено: 21.12.10 00:22 |
забыл
|
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ICQ: 209382104 Вопросов: 39 Ответов: 244 |
Профиль | Цитата | #2 | Добавлено: 24.02.11 13:24 |
Data1 - это что? |
Страница: 1 |
|