Коллеги, прошу помощи!

Есть база MS ACCESS 2010 SP2 + прилинкованные к ней таблицы MS SQL Server 2008 R2 (версия 10.50.1617.0)
Обмен через ODBC driver 11 for SQL Server
Есть таблица на MS SQL с числом записей около 700 000. На таблице висит триггер на insert - вставляет строчку в другую таблицу (логирование добавления записей)

Что происходит: открываю в Access таблицу, добавляю новую запись руками, перехожу на соседнюю запись что бы новая сохранилась и в этот момент на месте моей новой записи появляется произвольная существующая запись! Чисто визуально, на месте моей новой!
Потом я обновляю источник данных и вижу что моя новая запись есть и она сохранена. Т.е. натурально глюки!
Все тоже самое происходит при me.dirty=false если я делаю добавление записи руками через форму. после обновления записи на ее месте появляется произвольная запись!
Обращаю внимание, что requery источника данных не происходит! Т.е. это не типа обновился источник и другая запись отобразилась!

Что известно на данный момент:

1. Обновлял ODBC драйвер до 17 версии - не помогло

2. При отключении триггера проблема сразу исчезает! Но... триггер - проще некуда:
ALTER TRIGGER [dbo].[table_cdc_ins] ON [dbo].[table] AFTER INSERT AS
BEGIN

SET NOCOUNT ON;
insert cdc.[table]([cdc_op],[data]) select 1, [data] from inserted;

END

как только я убираю инструкцию insert из триггера - проблема исчезает. Нюанс в том, что вставка происходит в таблицу в другой схеме. Схему пока менять не пробовал.

3. В точности такой же триггер висит на других таблицах и к глюкам это не приводит! Но... в других таблицах меньшее количество строк. При удалении из проблемной таблицы половину данных - проблема исчезает! Ясное дело, что почистить таблицу я не могу как и не могу избавиться от триггера.

4. Сменить MS Access пока тоже не могу.

5. Проблема проявляется на нескольких таблицах с большим количеством данных.


Надеюсь на коллективный разум и ваши подсказки!

Спасибо!

https://www.sql.ru/forum/1315999/bag-access-ms-sql-2008r2

Всем привет.

В очередной раз столкнулся с ошибками после обновления Windows.
На этот раз "зацепило" массивы, а именно пустые массивы ParamArray.

Для примера сформируем такой массив с помощью простой функции:

Private Function ParamArray_Variant(ParamArray Params())
    ParamArray_Variant = Params
End Function

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

Пусть далее будет:

Dim v
v = ParamArray_Variant

Для v:

• IsMissing(v) = True
  
• IsArray(v) = True
  
• LBound(v) = 0
  
• UBound(v) = -1

Теперь определим простой массив и попробуем сделать то же самое действие:

Dim a()
a = ParamArray_Variant 'Здесь нас ждет сюрприз в виде ошибки 5 "Invalid procedure call or argument".

Но если ParamArray массив не пустой, то все хорошо:

Dim b()
b = ParamArray_Variant(1) 'ОК

Теперь нельзя просто взять и присвоить обычному массиву значение произвольного массива ParamArray.

Нужно обязательно проверять на IsMissing. Например так:

Dim a()
Dim v: v = ParamArray_Variant
If Not VBA.IsMissing(v) Then a = v

Проблемные обновления вышли 13.08.2019 на всех платформах, включая Windows 10. Скорее всего был затронут код в oleaut32.dll.

С уважением,
Павел

https://www.sql.ru/forum/1315989/poyavilas-oshibka-5-invalid-procedure-call-or-argument-posle-obnovleniy-windows-2019-08

Добрый день!

Не могу найти решения. Есть ограничения по выгрузке из учетной системы, поэтому данные выгружаются в эксель частями потом заливаются в аксесс. Для работы мне нужно объединить эти таблицы в одну. Но имена таблиц все время разные, одинаковый только формат. Можно ли написать универсальный запрос на объединение всех этих табличек в одну?

https://www.sql.ru/forum/1315987/unniversalnyy-zapros-na-obedinenie

В Таблице1 в Поле1 имеется OLE-обьект (вордовский документ Doc1.doc).Необходимо,чтобы при нажатии Кнопки1 на Форме1 вышеуказанный вордовский документ открывался(на чтение-по возможности).
Гуглил,но подобного примера не нашел,то ли он настолько элементарный,то ли что-то ещё не так,одним словом ПОМОГИТЕ!

https://www.sql.ru/forum/1315983/otkryt-ole-obekt-bez-redaktirovaniya-word

Необходимо,чтобы при загрузке формы на экране появлялась только сама форма БЕЗ панелей которые могут менять структуру любых объектов БД.
DoCmd.ShowToolbar ("Menu Bar"),acToolbarNo
DoCmd.ShowToolbar ("Database"), acToolbarNo
DoCmd.ShowToolbar ("Formatting(Form/Report)"), acToolbarNo
DoCmd.ShowToolbar ("Form View"), acToolbarNo
Почему-то не работают...

https://www.sql.ru/forum/1315976/access-2010-kak-otkluchit-paneli-pri-zagruzke-formy

Добрый день!

Подскажите как написать запрос, чтоб посчитать долю по группам:

Группа A A B B C

В итоге должно быть:

Группа Доля A 0.4 B 0.4 C 0.2

Если вручную подставлять количество записей в запрос, то все получается

SELECT тбл_1.Группа, Count([Группа])/5 AS Доля
FROM тбл_1
GROUP BY тбл_1.Группа;

Но хотелось бы, прописать это в запросе.

Спасибо!

https://www.sql.ru/forum/1315943/poschitat-dolu

В версии Office Standard 2019 программа Access естественно отсутствует. А базы данных надо использовать. Access Runtime для 2019 я не нашел. Но нашел следующие статьи
Access 2019 Runtime
Release an Office 2019 Access Runtime
Download and install Office 365 Access Runtime

Кто с этим сталкивался и кто как выходил из этого положения?


-------------------------------------------------------------
А ты вложил уже свой кровный рубль в 50-ти миллиардное состояние Билла Гейтса?

https://www.sql.ru/forum/1315917/problema-s-runtime-access-dlya-2019-ofisa

При вводе неправильного формата даты в форме выдаётся сообщение ВВЕДЕННОЕ ЗНАЧЕНИЕ НЕ ПОДХОДИТ ДЛЯ ДАННОГО ПОЛЯ...Вопрос такой-как отключить это сообщение для того,чтобы при ошибке ввода срабатывала подпрограмма vba которую напишу я (а не выдавалось это сообщение)?

https://www.sql.ru/forum/1315913/kak-otkluchit-soobshhenie-ob-oshibke-vvoda-v-forme

Добрый день, уважаемые!
Подскажите путь решения следующей задачи:
Имеется некоторое кол-во записей удовлетворяющих определенному условию. Пусть их будет 5. Посчитать их SELECT COUNT(*) WHERE MonCGentType LIKE 'ПЛ%' AND ReportDate NOT LIKE '%' труда не составляет. А вот далее надо значения поля MoneyID удовлетворяющие фильтру MonCGentType LIKE 'ПЛ%' AND ReportDate NOT LIKE '%' занести в отдельную таблицу INSERTом, и тут возникает проблема - никак не могу сообразитт как произвести перебор удовлетворяющих фильтру записей, если пользоваться запросом типа INSERT INTO TBL (FIELD1, FIELD2) VALUES ('ключ', (select moneyid from tblmoney where moncgenttype like 'пл%' and reportdate not like '%')) внутри цикла for i = 1 to (select count(*) from tblmoney where moncgenttype like 'пл%' and reportdate not like '%') тто в итоге получаем 5 записей с 'ключ' и значением поля клmoneyid споследнего добавленного в tblmoney

https://www.sql.ru/forum/1315898/sql-zapros-k-nekotorym-zapisyam

Здравствуйте!
Пыталась найти на форуме, но ответа не нашла.
Подскажите, если можно, такой вопрос.

Есть форма с объектом SpreadSheet и кнопкой. Надо по клику на кнопке поместить в SpreadSheet шаблон Excel, скопировать как-то, что ли... В шаблоне данных самих нет, чисто текст с форматированием, ну вроде бланка. Чтобы в SpreadSheet одномоментно отобразился этот шаблон.

Смысл в том, что пользователь его заполнит и кинет заполненный уже в большой Excel путем клика на соответствующую кнопку объекта SpreadSheet, там есть такая кнопка встроенная, даже вывод писать не надо.

Шаблоны есть в xlt - набор шаблонов.

Подскажите, пожалуйста.

https://www.sql.ru/forum/1315845/kak-v-spreadsheet-pomestit-shablon-excel

Добрый день.

Есть две таблицы с записями, связанные по ключу клиента:
- таблица операций;
- таблица клиентов.

В таблице клиентов есть лишние (не связанные) записи, которые нужно удалить. Как это лучше сделать? Прошу помощи у знатоков

https://www.sql.ru/forum/1315814/udalenie-ne-svyazannyh-zapisey

Добрый день!
Нужен лог ошибок, в котором записано какой sub был вызван в момент появления ошибки.
Как узнать имя вызванного sub?

https://www.sql.ru/forum/1315792/kak-uznat-imya-sub

написал простенький макрос с повтором, все работает, но когда пробую после цикла закрыть открытый запрос происходит нарушение цикла...подскажите плиз, что делаю не так?

https://www.sql.ru/forum/1315773/pomogite-chayniku-s-makrosom

Добрый день.
Подскажите пожалуйста как решить данную проблему. Использую Access 2016.
Есть таблицы "Товар"(главная таблица), "Производитель" и "Категория" и соответственно формы "Добавить товар", "Добавить производителя" и "Добавить категорию".
В таблице "Товар" есть поля "Производитель", "Категория" связанные с соответствующими таблицами. При добавлении нового товара через форму "Добавить товар", значения "Категория" и "Производитель" выбираются из поля со списком. При отсутствии необходимого элемента в соответствующей таблице, можно по кнопке перейти в форму добавления категории или производителя. При добавлении новой записи в таблицу "Производитель"/"Категория", необходимо чтобы соответствующая таблица обновилась и новое значение появилось в поле со списком.
Можно ли данную операцию сделать без использования Basic, а только на одних макросах?

https://www.sql.ru/forum/1315769/obnovlenie-znacheniy-v-pole-so-spiskom

В теме и весь вопрос.
Access 2003 экспортирую так

DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel8, ....

или как-то по-другому делать?

https://www.sql.ru/forum/1315767/kak-pri-eksporte-v-excel-zadat-shrift-prosyat-arial-razmer-12

Добрый день.
Есть таблица контактов. Одно из полей в этой таблице - гиперссылка (на адрес сайта клиента).
Есть свободная форма, из полей которых данные заносятся в таблицу.

Для добавления данных в эту таблицу использую запрос на добавление:

Set ppp = CurrentDb
ppp.Execute "INSERT INTO ....
ppp.Close

А для обновления данных в этой таблице использую запрос на обновление:

Set bbb = CurrentDb
bbb.Execute "UPDATE .....
bbb.Close

И всё ок кроме того, что адрес сайта (который вводится в поле формы) вставляется / обновляется в табл. не как гиперссылка, а как обычный текст.
А нужно, чтобы сохранялся формат гиперссылки.

Что делать?

https://www.sql.ru/forum/1315707/giperssylka-i-zaprosy-na-dobavlenie-obnovlenie-dannyh

Добрый день!
Как по средствам VBA определить открыта форма или отчет?

https://www.sql.ru/forum/1315688/kak-opredelit-otkryta-forma-ili-otchet

Доброго времени суток!
При импортировании таблицы с excel через основное меню access, по завершению импорта выводится ошибка "Недостаточно системных ресурсов". После перезапуска приложения, импортированная таблица открывается но часть полей в конце таблицы пусты. Объем импортируемой таблицы с excel 149МБ, количество записей около 610тыс. Раньше такой импорт проводился без проблем, теперь никак.
Подскажите пожалуйста как быть?

https://www.sql.ru/forum/1315663/oshibka-pri-importe-tablicy-s-excel

Добрый день.
Нужно узнать количество [id_report], в таблице [tbl_counting_reports] у которых [in_work] = 0.
Подскажите, пожалуйста, что я не правильно сделал?

Dim dbs As DAO.Database
Dim rsSQL3 As DAO.Recordset
Dim strSQL3 As String

Set dbs = CurrentDb
                    
strSQL3 = "SELECT count(id_report) FROM tbl_counting_reports WHERE in_work =" & 0 & ""
Set rsSQL3 = dbs.OpenRecordset(strSQL3, dbOpenSnapshot)
MsgBox (rsSQL3)
                    

https://www.sql.ru/forum/1315641/podschitat-kolichestvo-strok-posle-vyborki

Добрый день!

Нужно посчитать количество записей в 11 базах по определенному условию. В каждой БД порядка миллиона записей.

Пробую делать это двумя способами:

Способ 1.
1) запросом на объединение объединяю все 11 БД
2) запросом на группировку считаю количество записей

Способ 2.

1) в запрос на объединение сразу вставляю запросы на группировку и считаю

Проблема в том, что оба способа выполняются достаточно долго. Какой способ предпочтительней? Или лучше как-то по другому делать?

Спасибо!

https://www.sql.ru/forum/1315630/obedinenie-neskolkih-bd