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

Поиск:

Закрытая темаСоздание новой темы Создание опроса
> ComboBox: строки - имена таблиц Access 
:(
    Опции темы
Loiste
Дата 28.9.2005, 12:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Подскажите, пожалуйста, можно ли организовать выпадающий список ComboBox в базе данных Access так, чтобы его элементами были имена всех таблиц данной базы данных? Если да, то как это осуществить?
PM MAIL   Вверх
likhobory
Дата 28.9.2005, 12:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



Код

For Each tbl In CurrentData.AllTables
'''''''''''''''''
Next



--------------------
PM MAIL   Вверх
Loiste
Дата 28.9.2005, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Не понятно, как сформировать этот список? Программно..т.е. как прописать добавление новой строки списка и присвоение ей значения имени таблицы?

У элемента есть свойство Источник строк - в нем обычно указывается таблица или запрос..но как быть в данном случае?

И в какой момент производить формирование этого списка? на Входе?
PM MAIL   Вверх
Akina
Дата 28.9.2005, 13:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Код

Private Sub Form_Load()
Dim OneForm As TableDef
For Each OneForm In CurrentDb.TableDefs
   ComboBox1.AddItem OneForm.Name
Next
End Sub



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

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


Опытный
**


Профиль
Группа: Участник
Сообщений: 446
Регистрация: 14.8.2002
Где: Молдова, Кишинев

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



Код

SELECT NAME FROM msysobjects
WHERE msysobjects.Type=1

PM MAIL   Вверх
Akina
Дата 28.9.2005, 16:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



bas
Для ЭТОГО надо иметь права - которых может не оказаться...


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

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


Шустрый
*


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

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



Цитата(Akina @ 28.9.2005, 13:34)
Код

ComboBox1.AddItem

Сообщение отладчика:

"Method or data member not found"

Я работаю с Access 2000, используя модель ADO.
PM MAIL   Вверх
Akina
Дата 30.9.2005, 11:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Цитата(Loiste @ 29.9.2005, 10:53)
Сообщение отладчика:

"Method or data member not found"

Я работаю с Access 2000, используя модель ADO.

А имя комбобокса - какое? smile


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

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


Шустрый
*


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

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



Цитата(Akina @ 30.9.2005, 11:49)
А имя комбобокса - какое? smile

Я назвала его ComboBox1, как в предложенном варианте smile

PM MAIL   Вверх
Akina
Дата 30.9.2005, 13:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


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


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

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



Тогда проверяй референсы.


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

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

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

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

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


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

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


 




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


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

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