ReSQL.ru
     
powered by simpleCommunicator - 2.0.41     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / docmd.openquery с параметром
7 сообщений из 7, страница 1 из 1
docmd.openquery с параметром
    #40122348
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
Полчаса искал - не нашел
есть запрос сохраненный, ну NAME1
он использует 2 других , у которых есть одинаковый параметр pthm, запросы - NAME2,NAME3
Надо его запустить из кода,параметр в коде определяется
Итак - определили параметр - допустим это переменная pth

Код: vbnet
1.
2.
3.
4.
 CurrentDb.QueryDefs("NAME1").Parameters(0).Value = pth
   CurrentDb.QueryDefs("NAME2").Parameters(0).Value = pth
   CurrentDb.QueryDefs("NAME3").Parameters(0).Value = pth
    DoCmd.OpenQuery "NAME1"



Выпадает окошко с запросом параметра, ничего не вводим, нажимаем ОК - запрос запускается с параметром ""

Код: vbnet
1.
2.
3.
CurrentDb.QueryDefs("NAME2").Parameters(0).Value = pth
   CurrentDb.QueryDefs("NAME3").Parameters(0).Value = pth
    DoCmd.OpenQuery "NAME1"


так - то же самое....

Код: vbnet
1.
2.
 CurrentDb.QueryDefs("NAME1").Parameters(0).Value = pth
     DoCmd.OpenQuery "NAME1"



И так - то же самое.....

Как надо запустить запрос, что бы окошко запроса параметра не выпадало, передав его из VBA?
Не ну конечно могу в коде в в текст запроса подсунуть нужные значения, но как-то пока не хочется - там текст одного запроса больше страницы...
...
Рейтинг: 0 / 0
23.12.2021, 09:25
| Ответить | Цитировать | Написать  
docmd.openquery с параметром
    #40122358
Фотография vmag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vmag
Участник
Serg197311,

так тоже не прокатит?
Код: vbnet
1.
2.
3.
4.
5.
Set qs2 = CurrentDb.QueryDefs("NAME2")
qs2![pthm] = pth
Set qs3 = CurrentDb.QueryDefs("NAME3")
qs3![pthm] = pth
'.............
...
Рейтинг: 0 / 0
23.12.2021, 10:14
| Ответить | Цитировать | Написать  
docmd.openquery с параметром
    #40122365
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
А дальше то что написать??
если DoCmd.OpenQuery "NAME1" - то все равно окошко вываливается...
...
Рейтинг: 0 / 0
23.12.2021, 10:47
| Ответить | Цитировать | Написать  
docmd.openquery с параметром
    #40122376
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Serg197311
А дальше то что написать??
какое отношение имеет
Serg197311
Код: vbnet
1.
CurrentDb.QueryDefs("NAME1").Parameters(0).Value = pth


к
Serg197311
Код: vbna
DoCmd.OpenQuery "NAME1"
?
Читаем до просветления - https://www.sql.ru/faq/faq_topic.aspx?fid=410
...
Рейтинг: 0 / 0
23.12.2021, 11:19
| Ответить | Цитировать | Написать  
docmd.openquery с параметром
    #40122380
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Панург
Читаем до просветления
кстати, не плохо бы актуализировать faq, например, добавить про коллекцию TempVars как способ передачи параметров.
...
Рейтинг: 0 / 0
23.12.2021, 11:29
| Ответить | Цитировать | Написать  
docmd.openquery с параметром
    #40122387
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
Панург

Читаем до просветления

Нет бы сказать - пива - нет. А то пииива нееетт.....)
Ламер я, Панург, ламер - не отрицаю.
Ну - пойдем другим путем
...
Рейтинг: 0 / 0
23.12.2021, 11:52
| Ответить | Цитировать | Написать  
docmd.openquery с параметром
    #40122391
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Serg197311
Ламер я, Панург, ламер - не отрицаю.
зачем голову пеплом тут посыпать?
Нужно понять просто, что это совершенно разные объекты. OpenQuery - это команда открытия специализированной формы (объект интерфейса Access) в источнике данных которой лежит тот или иной запрос (таблица тоже самое), и к самому запросу имеет опосредованное отношение. Так же как QueryDefs. А уж между собой они и подавно...
...
Рейтинг: 0 / 0
23.12.2021, 12:14
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / docmd.openquery с параметром
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1609511]:
 0ms
get settings:
 11ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 30ms
get topic data:
 13ms
get first new msg:
 8ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 250ms
total:  394ms
созд. / загр.: 394ms
x
x
Закрыть


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