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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Доступ к полю открытой БД Access, из макроса Access 
V
    Опции темы
mihanik
Дата 10.10.2006, 08:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

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



Привет.

Формулировка задачи.

1. Есть БД access. (MDB)
2. В ней есть таблица с именем. Например, "clients".
3. Записи таблицы состоят из нескольких полей: FIO, ADRES, ID
4. Нужно из макроса, встроенного в БД "пробежать" по какому либо "столбцу" и проанализировать его.

Что мне нужно.

1. Как обращаются в access к уже открытой таблице?
2. Как встать на первую запись этой таблицы?
3. Как перемещаться?
4. Как обратиться к конкретному полю записи?

Вопросы тупые, но...
Хотел запустить "запись макроса" в access, чтобы проанализировать код и получить ответы на свои вопросы, но не нашёл, как это делать.

Из программы на VB 6 всё это делается влёгкую.
Делал и не раз.
А вот напрямую из access...



--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
boevik
Дата 10.10.2006, 08:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1452
Регистрация: 31.5.2004
Где: Израиль

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



Напиши код в модуле, код почти такой же как и в VB6.



--------------------
Никогда не говори никогда
PM MAIL WWW   Вверх
mihanik
Дата 10.10.2006, 08:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

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



Угу...
Понятно...

Я почему засомневался?

Допустим доступ к объёктам ехеля из самого ехеля намного проще, чем из проги, написанной на VB.
Вот я и думаю, а нет ли простого способа подключиться к уже открытой аксесом таблице "по-простому".

Не в курсе? smile 


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
boevik
Дата 10.10.2006, 09:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1452
Регистрация: 31.5.2004
Где: Израиль

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



Обычно в Access-e я пишу также как и на VB, единстврнное, не надо connection string.
Функция CurrentDB() возвращает ссылку на mdb file. А дальше как обычно, селекты и т.д.



--------------------
Никогда не говори никогда
PM MAIL WWW   Вверх
mihanik
Дата 10.10.2006, 09:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

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



Если не лень, кинь кусочек кода для подключения к БД в моём случае.

Хочется посмотреть...


Это сообщение отредактировал(а) mihanik - 10.10.2006, 09:08


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
boevik
Дата 10.10.2006, 09:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1452
Регистрация: 31.5.2004
Где: Израиль

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



Не лень.
Код

Dim db as database
Dim tblDef As TableDef
Set db = CurrentDb() 'доступ к базе данных
Set tblDef = db.TableDefs("tblMyTable") 'доступ к таблице tblMyTable
 


--------------------
Никогда не говори никогда
PM MAIL WWW   Вверх
mihanik
Дата 10.10.2006, 09:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

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



boevik, спасибо!!!
Помог!!!



--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

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

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

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

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


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

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


 




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


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

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