Access 2019 и параметрические запросы

@Silur · Регистрация: 16.01.2014

Студворк — интернет-сервис помощи студентам

По указанию начальства организацию переводят на Office 2019
Пару недель работали нормально. Но подошло время писать отчёты. А там у меня всё на хранимых параметрических запросах.
Для тех, кто не знает. Это такие запросы, в которые передаются параметры при вызове (запуске) запроса.
В Access 2010 всё работало нормально, а сейчас отказывается

Пример хранимого параметрического запроса

SQL
1
2
3
4
5
6
PARAMETERS [cYear] Long, [cPeriod] Long;
INSERT INTO tbl_Temp12b ( КодСубъект, НаимСубъект, КодОбл )
SELECT Тб304РеСубъект.КодСубъект, Тб304РеСубъект.НаимСубъект, Тб304РеСубъект.КодОбл
FROM Тб304РеСубъект INNER JOIN Тб321КлПериод ON Тб304РеСубъект.[Код период] = Тб321КлПериод.КодПериод
WHERE (((Тб321КлПериод.pYear)=[cYear]) AND ((Тб321КлПериод.IdCodPeriod)=[cPeriod]))
WITH OWNERACCESS OPTION;

Вызов в программе выглядит так

Visual Basic
1
2
3
                strParameters = " " & intCurYear & ", " & 16 ' " 2023, 16"
' заполнение временной таблицы tbl_Temp12b начальными данными
        CurrentProject.Connection.Execute "qry_Tab12f" & strParameters

Если запрос запускается из программы то выдаётся сообщение - смотри рисунок

Но если запрос запустить из оболочки Access дважды щелкнув по нему То запрашиваются параметры и он нормально отрабатывает.

Первый рисунок - запрос запускается кодом из программы, второй и третий - из оболочки Access.

Что делать?!

@Eugene-LS · 12.10.2023, 13:50

Сообщение от Silur

Дело оказалось в несовпадении размеров символьного поля источника и приёмника

Да!?
... пост #56 (Вчера, 17:27)

Добавлено через 18 минут
Silur, и в пост #70 загляните пожалуйста.

@Silur · 12.10.2023, 15:38 **[ТС]**

Сообщение от Eugene-LS

Да!?
... пост #56 (Вчера, 17:27)

Так я благодаря этому посту и разобрался. За это отдельное спасибо.

Добавлено через 25 минут
Просто в этом посту не указывалось, что всё дело в размерности.
Если вставляешь при помощи DAO, то он вставляемую информацию обрезает по размеру поля-приемника. А если вставляешь через ADO, то тут обрезка не происходит, а выдаётся ошибка.

@alvk · 13.10.2023, 08:22

Сообщение от Панург

и я не хочу помнить где у функции чего торчит

Говорят "не хочу", подразумевают "не могу". Это уже старость. На самом деле я прав, прими уже это.

@Панург · 13.10.2023, 09:30

Сообщение от alvk

Говорят "не хочу", подразумевают "не могу".

а вот это маразм извращать чужие слова. Сам придумал - сам посмеялся...

@alecko5 · 13.10.2023, 10:25

выкинуть option explicit из шапки модуля
объявить там же

Visual Basic
1
DefStr s

получим возможность не объявлять strsql, а применять сразу как public, при этом scope в пределах функции.

@Панург · 13.10.2023, 10:36

Сообщение от alecko5

выкинуть option explicit из шапки модуля
...
получим возможность не объявлять strsql, а применять сразу как public, при этом scope в пределах функции.

давайте ещё больше граблей!..

@alecko5 · 13.10.2023, 12:17

Сообщение от Панург

давайте ещё больше граблей!..

где грабли? штатный способ. требует, конечно "соблюдать гигиену".

Новые блоги и статьи Все статьи Все блоги /
Сегодня суббота, 22.08.2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. zorxor 22.08.2026 Сегодня суббота, 22. 08. 2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. Кто Я, откуда Я пришел и куда Я иду? Эти вопросы не оставляют меня ни на секунду. Жизнь на планете Земля. . .	Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.	Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .
Лето уходит kumehtar 17.08.2026	Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .	Перемещение строк из ТЧ в другой документ с учетом текущего пробега Maks 17.08.2026 Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .	Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .