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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Список, Установить количество колонок 
:(
    Опции темы
Idsa
Дата 3.4.2008, 00:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Я присваиваю свойству RowSource списка select-запрос. Подскажите, как сделать так, чтобы количество колонок в списке было равно количеству возвращаемых запросом полей (запрос вводится вручную в TextBox, так что статически задать количество колонок невозможно).


--------------------
Мой блог: alexidsa.blogspot.com
PM MAIL ICQ   Вверх
Akina
Дата 3.4.2008, 07:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Программно, нечто вроде ListBox.Columns = ListBox.RowSource.ColumnCount


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Idsa
Дата 3.4.2008, 08:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Akina, это первое, о чем я подумал... Однако RowSource - свойство типа string - у него нет свойства ColumnCount.


--------------------
Мой блог: alexidsa.blogspot.com
PM MAIL ICQ   Вверх
Akina
Дата 3.4.2008, 08:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Idsa, погодите... Это не Visual Basic. Сколько бы Вы не меняли RowSource и не перезапрашивали данные, ColumnCount будет оставаться таким, каким он был задан в макете, если Вы его не изменили явно. Но если Вы его где-то изменили... ну так прочитайте его. 


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Idsa
Дата 3.4.2008, 08:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Цитата(Akina @  3.4.2008,  08:29 Найти цитируемый пост)
Но если Вы его где-то изменили... ну так прочитайте его.  

Я изменил RowSource, но не знаю, как изменить ColumnCount для списка, т. к. не могу найти способ считать RowCount запроса.


--------------------
Мой блог: alexidsa.blogspot.com
PM MAIL ICQ   Вверх
Akina
Дата 3.4.2008, 13:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Цитата(Idsa @  3.4.2008,  09:46 Найти цитируемый пост)
не могу найти способ считать RowCount запроса

Открыть тот же запрос как рекордсет и спросить его FieldsCount. Например.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Idsa
Дата 4.4.2008, 10:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Цитата(Akina @  3.4.2008,  13:37 Найти цитируемый пост)
Открыть тот же запрос как рекордсет и спросить его FieldsCount.

Спасибо.
Получился такой код:
Код

Dim queryString As String

queryString = Me.sqlTextBox.Value
Me.list.RowSource = queryString
Me.list.ColumnCount = CurrentDb.OpenRecordset(queryString).Fields.Count

Хотя решение неоптимальное: для одной задачи используется 2 соединения с базой данных.


--------------------
Мой блог: alexidsa.blogspot.com
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "MS Access"
Akina
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] и [code=sql][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

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

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

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


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

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


 




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


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

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