ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Макросы
12 сообщений из 12, страница 1 из 1
Макросы
    #32095890
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Народ есть трабла.
Я хочу на открытие и закрытие БД выполнить некии телодвижения с помощью VBA, код VBA я запихал в модуль. Я слышал что его можно вроде выполнить как то с помощью макроса, но так получилось что я в этом не ухом не рылом.

Подскажите, на пальцах, как выполнить модуль на открытие/закрытие БД

Заранее спасибо
Sfagnum
...
Рейтинг: 0 / 0
24.01.2003, 13:37
| Ответить | Цитировать | Написать  
Макросы
    #32095893
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Ах да... я совсем забыл... юзаю Access'97
...
Рейтинг: 0 / 0
24.01.2003, 13:39
| Ответить | Цитировать | Написать  
Макросы
    #32095902
Guesticha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Guesticha
Гость
ОткрытьМодуль, в макросе, сохранить как Autoexec...
...
Рейтинг: 0 / 0
24.01.2003, 13:46
| Ответить | Цитировать | Написать  
Макросы
    #32095906
Guesticha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Guesticha
Гость
+ др макрос ЗапускМакроса, повесив в настройках на закрытие, или запуск БД...
...
Рейтинг: 0 / 0
24.01.2003, 13:49
| Ответить | Цитировать | Написать  
Макросы
    #32095929
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
To Guesticha:
Если можно то на пальчиках пожалуста.

1.
> ОткрытьМодуль, в макросе, сохранить как Autoexec...
т.е. в макросе на Action выбрать OpenModule ну и там прописать всё как надо?.. - модуль открывает, а как его просто выполнить

2
> + др макрос ЗапускМакроса, повесив в настройках на закрытие, или запуск БД...
ЗапускМакроса - понял...
повесив в настройках на закрытие - не подскажете хде это?

т.е. у меня щас остались вопросы
1. как макросом запустить модуль
2. где ентот макрос и за что подвесить
...
Рейтинг: 0 / 0
24.01.2003, 14:03
| Ответить | Цитировать | Написать  
Макросы
    #32095940
...
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
...
Участник
естественно можно, ты же мне помощь оказывал...))
Маркакоманда...ОткрытьМодуль...(Имя модуля)...(Имя запускаемой процедуры)
сохранить как Autoexec для того, чтобы выполнялся при запуске..., в код вставить ссылку на его запуск при запрытии БД:

Код: plaintext
1.
2.
3.
4.
Dim stDocName As String

    stDocName = ChrW( 1052 ) & ChrW( 1072 ) & ChrW( 1082 ) & ChrW( 1088 ) & ChrW( 1086 ) & ChrW( 1089 ) & ChrW( 49 )
    DoCmd.RunMacro stDocName
    DoCmd.Close
...
Рейтинг: 0 / 0
24.01.2003, 14:12
| Ответить | Цитировать | Написать  
Макросы
    #32095957
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shark
Участник
Про закрытие.
При открытии открывать невидимую форму, а на ее закрытие написать код.
В autoexec не надо открывать никаких модулей, просто выполнить команду:
Запуск программы
...
Рейтинг: 0 / 0
24.01.2003, 14:27
| Ответить | Цитировать | Написать  
Макросы
    #32095974
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Маркакоманда...ОткрытьМодуль...(Имя модуля)...(Имя запускаемой процедуры) - открывает модуль, а не запускает процедуру в модуле
RunCode...(Function) - вроде должно работать, но не работает...
Autoexec - выполняется.
А выделенный текст не понял куда вставить

То Shark:
Невидимая форма это как? Какое свойство отвечает за её невидимость?
(Access'97)
...
Рейтинг: 0 / 0
24.01.2003, 14:41
| Ответить | Цитировать | Написать  
Макросы
    #32095990
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shark
Участник
1) Про невидимость- В Docmd.OpenForm есть параметр
2) Функция должна быть public для макроса
...
Рейтинг: 0 / 0
24.01.2003, 14:52
| Ответить | Цитировать | Написать  
Макросы
    #32096012
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
То Shark

1. Спасибо помогло
2. RunCode...(Function) - не работает. Не паблик процедуры видны и назначались, поменял на паблик - не помогло...
...
Рейтинг: 0 / 0
24.01.2003, 15:05
| Ответить | Цитировать | Написать  
Макросы
    #32096023
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Ссорьки работает но как то срраннно - таблицы/запросы удалить - пожалуста.
а как новые создать фигушки вамушки... млин....
...
Рейтинг: 0 / 0
24.01.2003, 15:10
| Ответить | Цитировать | Написать  
Макросы
    #32096025
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Во млин до чего себе глаза замылил...
Вообщем на RunCode...(Function) Sub ставить нельзя(???) только Function причём паблик не паблик - побарабану.

Всем спасибо
...
Рейтинг: 0 / 0
24.01.2003, 15:15
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Макросы
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]