Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Set DataGrid.DataSource = RS, Нет ни ошибок, ни результата.. 
V
    Опции темы
FallFan
Дата 8.6.2010, 15:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 83
Регистрация: 30.3.2008
Где: Санкт-Петербург

Репутация: нет
Всего: нет
Всем доброго времени суток!

Необходимо выводить информацию из БД Access (*.mdb) на форму, в табличном ввиде. Для чего был выбран компонент DataGrid.

Поискав информацию по интернету и на форуме, часто натыкаюсь на очевидное решение в виде:

Код

Set DataGrid.DataSource = RecordSet


Или, если наиболее полно:

Код

Dim DBConnection As ADODB.Connection
Dim RS As ADODB.Recordset

Dim DBConnectionString As String
Dim SQLRequest As String
Dim MainBasePath As String
Dim ConnectProviderString As String

ConnectProviderString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
MainBasePath = "C:\Main.mdb"
DBConnectionString = ConnectProviderString + MainBasePath
    
Set DBConnection = New ADODB.Connection
DBConnection.Open DBConnectionString

SQLRequest = "SELECT * FROM Test;"

Set RS = New ADODB.Recordset
RS.Open SQLRequest, DBConnection, adOpenStatic, adLockPessimistic
If Not RS.EOF Then RS.MoveFirst

Set dgIn.DataSource = RS
dgIn.Refresh


В таблице "Test" имеется одно поле ("id", тип числовой, значение : 12).

При исполнении кода никаких ошибок VB6 не выводит, но и DataGrid остается неизменным, при этом, повторюсь, в большинстве случаев указывается решение в виде: 

Код

Set dgIn.DataSource = RS


Прошу помочь, кто сталкивался с этой проблемой или знает, что я не учитываю.

Спасибо!
PM   Вверх
Akina
Дата 8.6.2010, 15:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454
DataGrid изначально предназначен для отображения данных, которые ему поставляет ADO Data Control. Соответственно изменять надо свойства не грида, а дата контрола.
Для отображения же непосредственно рекордсета используйте не DataGrid, а Grid Control.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
FallFan
Дата 8.6.2010, 16:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 83
Регистрация: 30.3.2008
Где: Санкт-Петербург

Репутация: нет
Всего: нет
Спасибо!

P.S.
 Выбрал MSHFlexGrid 6.0
PM   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0438 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.