Добрый день!

Подскажите пожалуйста,
есть табличка в файле accdb,
как программно, на VBA, сделать одно из полей таблицы индексированным?
(речь про установку свойства, которое в конструкторе называется "Индексированное поле")

Спасибо!

http://www.sql.ru/forum/1274000/indeksirovannoe-pole-programmno

Всем привет!
В главной форме нужно сделать Requery, а потом в подчененной Recordset.MoveLast.
При этом в подчиненной форме скроллер экрана этой подчиненной формы убегает в самый низ, а последняя запись становится на экране на самый верх (на первую строку).
Т.е. видно только 1-у запись в форме - последнюю.
--
Теперь вопрос.
Как сделать так, чтобы после MoveLast последняя запись была внизу экрана.
Т.к. есть пользователям не удобно ...

Пока выхожу из положения так. Осознаю, что это кривой способ ... (в экранной форме 10 строк).

    Form_Form2.Recordset.MoveLast
    Form_Form2.Recordset.MovePrevious 
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MovePrevious
    Form_Form2.Recordset.MoveLast

http://www.sql.ru/forum/1273968/me-recordset-movelast-i-vse-zapisi-na-ekrane

Добрый день. вдруг сегодня 12/10/2017 перестал работать импорт в Access2003 из Excel2003 (до этого все работало уже более пяти лет без проблем). выдает ошибку. подскажите пожалуйста в чем проблема. может обнова вышла новая? это на всех компах такая ошибка где стоит программа под access 2003

http://www.sql.ru/forum/1273955/import-v-access2003

Добрый день! Мне необходимо соединить 5 таблиц в MS Access. Проблема заключается в том, что некоторых столбцов в отдельных таблицах не хватает, поэтому запрос на объединения у меня имеет примерно следующий вид:

SELECT * INTO Сводная2015
FROM 
(SELECT [Год],[Месяц], [ДатаФактОМ], [Полное наименование материала], 
CDbl([Диам, мм]) as [Диаметр, мм], 
CDbl([Стен, мм]) as [Стенка, мм], 
[НТД1], [МСтали], [ГрПроч], [Вид покрытия], [ТипВысадки], [Тип резьбы], 
CDbl([Размер1]) as [1размер], 
CDbl([Размер2]) as [2размер], 
[ПризнТермо], [Мерность длины]
FROM [Таблица1]

UNION ALL

SELECT [Год],[Месяц], [пусто], [Полное наименование материала], 
CDbl([Диам, мм]) as [Диаметр, мм], 
CDbl([Стен, мм]) as [Стенка, мм], 
[НТД1], [МСтали], [ГрПроч], [Вид покрытия], [ТипВысадки], [Тип резьбы], 
[пусто] as [1размер], 
[пусто] as [2размер], 
[ПризнТермо], [Мерность длины]
FROM [Таблица2]

 UNION ALL

SELECT [Год],[пусто], [пусто], [пусто], 
CDbl([Диам, мм]) as [Диаметр, мм], 
CDbl([Стен, мм]) as [Стенка, мм], 
[НТД1], [МСтали], [ГрПроч], [пусто], [ТипВысадки], [Тип резьбы], 
[пусто] as [1размер], 
[пусто] as [2размер], 
[ПризнТермо], [Мерность длины]
FROM [Таблица2]

В этом примере в первой таблице присутствуют все требуемые столбцы, а в последующих двух таблицах некоторые отсутствуют.
Чтобы таблицы могли соединиться, я создаю столбец [пусто] в каждой таблице и ссылаюсь на него, если требуемый столбец отсутствует.

Но для этого мне приходится создавать в каждой таблице этот самый стобец [пусто], а это неудобно. Подскажите, есть ли способ избежать этой операции?

http://www.sql.ru/forum/1273912/soedinenie-tablic-v-ms-access

Доброго времени суток!

Мне досталась в наследство очень сложное и запутанное приложение на аксесс с очень большим количеством объектов. которое вынужден сопровождать. Приложение писалось НЕпрограммистом по профессии и в нем нет ни строчки на vba: все делалось на макросах.

Очень трудно и хлопотно разобраться во всех хитросплетениях и взаимосвязях програмы. После долгих, почти бесплодных, попыток разобраться у меня возникала мысль, что неплохо было бы иметь утилиту, которая разложила бы по полочкам все объекты и их взаимосвязи. Нечто вроде Object Dependencies, но гораздо более продвинутое. Естесственно я попытался найти нечто подобное в сети но безуспешно. Вернее таких утилит и расширений масса, новсе они покрывают лишь часть того, что мне хотелось бы.

Наверное лучший способ понять то, чего я хочу это перечислить, то чего не хватает в Object Dependencies:
- возможность при трассировке объектов в одном направлении, начиная с какого либо места продолжить двигаться в другом. Например с направления i depend on в направление depend on me и наоборот
- отсутствие макросов и модулей
- возможность трассировки вплоть до полей таблиц, форм, запросов и отчетов
- включение в зависимости также события форм и отчетов и связаные с ними функции, модули и макросы.

Таким образом мой вопрос состоит в том, есть ли утилита или расширение, которое могло бы в некоторой степени удовлетворить вышеуказанные мной пожелания?

Заранее благодарен за любую информацию по этому вопросу.

http://www.sql.ru/forum/1273885/obektnaya-model-prilozheniya-access

Как программно выделить запись в ленточной форме? Есть такая необходимость.
Вручную - это щёлкнуть мышкой по области выделения.
Просто сделать Me.RecordSelectors.SetFocus не проходит. Нет у него такого свойства.

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

http://www.sql.ru/forum/1273868/programmno-vydelit-zapis-v-lentochnoy-forme

Как проверить, что в подчинённой форме произошли изменения записей.
В подчинённой ставим галочки и вносим данные.
Там же имеется кнопка сохранить данные.
Но как и в какой момент отловить, что данные в некоторых записях поменялись, и попросить пользователя сохранить изменения.
Так как затем эти данные переносятся в таблицу для хранения.
Но если не сохранить данные, то они останутся на форме, а при её закрытии - исчезнут типа.
------------------------------------------------------------------------
Спасибо за ответ.

http://www.sql.ru/forum/1273723/proverka-izmeneniy-v-podchinyonnoy-forme

Как проверить, что в подчинённой форме произошли изменения записей.
В подчинённой ставим галочки и вносим данные.
Там же имеется кнопка сохранить данные.
Но как и в какой момент отловить, что данные в некоторых записях поменялись, и попросить пользователя сохранить изменения.
Так как затем эти данные переносятся в таблицу для хранения.
Но если не сохранить данные, то они останутся на форме, а при её закрытии - исчезнут типа.
------------------------------------------------------------------------
Спасибо за ответ.

http://www.sql.ru/forum/1273723/proverka-izmeneniy-v-podchinyonnoy-forme

Пытаюсь создать связанную таблицу. Почему то возникает ошибка. И ругается на внешний ключ

http://www.sql.ru/forum/1273712/oshibka-pri-sozdanii-svyazannoy-tablicy

Пытаюсь создать связанную таблицу. Почему то возникает ошибка. И ругается на внешний ключ

http://www.sql.ru/forum/1273712/oshibka-pri-sozdanii-svyazannoy-tablicy

И снова здравствуйте!
Теоретический вопрос на этот раз. Протестировал прямое обращение клиента на аксессе к серверу ms SQL, который развернул в облаке. (спасибо майкрософту за azure.).
На стороне клиента (аксесса) есть только формы, в которых вывод, обновление, удаление происходит только при помощи запросов со стороны аксесса (никаких линкованных таблиц и пр. нет.).
Вывод на экран производится через ADO процедуру, которая заканчивается на набившее уже оскомину выражение типа me.recordset = rs
Все здорово, все работает. вся защита и права на стороне сервера. никаких линкованных таблиц нет, только хардкор и несвязанный изначально с формой рекордсет)

Но при таком способе передачи данных в форму отваливается пользовательский фильтр (в списке фильтра при его раскрытии в заголовке столбца не выводиться список значений полей .)

подскажите пожалуйста, можно как нибудь организовать работу фильтра , не ломая метода вывода данных с сервера на форму?

С Уважением,
Сергей

http://www.sql.ru/forum/1273680/i-snova-me-recordset-rs

И снова здравствуйте!
Теоретический вопрос на этот раз. Протестировал прямое обращение клиента на аксессе к серверу ms SQL, который развернул в облаке. (спасибо майкрософту за azure.).
На стороне клиента (аксесса) есть только формы, в которых вывод, обновление, удаление происходит только при помощи запросов со стороны аксесса (никаких линкованных таблиц и пр. нет.).
Вывод на экран производится через ADO процедуру, которая заканчивается на набившее уже оскомину выражение типа me.recordset = rs
Все здорово, все работает. вся защита и права на стороне сервера. никаких линкованных таблиц нет, только хардкор и несвязанный изначально с формой рекордсет)

Но при таком способе передачи данных в форму отваливается пользовательский фильтр (в списке фильтра при его раскрытии в заголовке столбца не выводиться список значений полей .)

подскажите пожалуйста, можно как нибудь организовать работу фильтра , не ломая метода вывода данных с сервера на форму?

С Уважением,
Сергей

http://www.sql.ru/forum/1273680/i-snova-me-recordset-rs

С помощью метода:

Табл.FindFirst "[Фамилия] = '" & dic("F" & CStr(j)) & "' and [Имя] = '" & dic("I" & CStr(j)) & "' and [Отчество] = '" & dic("O" & CStr(j)) & "'"

проверяю есть ли запись в таблице, чтобы знать вставлять её в таблицу или нет, где-то с вероятностью в 10% выскакивает ошибка: "3420 Указан недопустимый объект, или объект более не задан."
Никак не могу понять почему она выскакивает? Подскажите где логика?
Если нужно могу выложить исходники (7 Мб) на гугл диск.

Модератор: Тема перенесена из форума "Visual Basic".

http://www.sql.ru/forum/1273646/v-ms-access-oshibka-3420-ukazan-nedopustimyy-obekt-ili-obekt-bolee-ne-zadan

Есть файлик Аксес, в нем записаны макросы. При отработке одного их них выпадает следующая ошибка
The expression On Click you entered as the event property settings produced the following error:
A prоblem (на это слово ругалось при заведении темы) occurred while Microsoft Access was communicating with the OLE server or ActiveX Control.
скриншот в приложении

Доп. сведения: В основном в файле все на английском и французском (имена таблиц\файлов).
Ставил и французский пакет на офис и в самой винде включал французский язык - ошибка та же.

Хотя у первоисточника (у иностранца) - все ок!

Плиз помогите! =)

http://www.sql.ru/forum/1273640/a-problem-occurred-while-microsoft-access-was-communicating-with-the-ole-serv-ms-access

Здравствуйте!
При создании подчиненной формы через мастера форм, в MS Access 2016, выдает ошибку - Невозможно создать форму.
Не подскажете, в чем может быть проблема?
Спасибо!

http://www.sql.ru/forum/1273593/ne-udaetsya-sozdat-formu

кто может подсказать
я создал форму,а как активировать её таймер? установить интервал срабатывания?

http://www.sql.ru/forum/1273584/taymer

Структура базы

Таблица: Объекты (Object1, Object2, Object3, ...)
Таблица: Статьи расхода (Себе, Людям, ....)
Таблица: Расположение точки расхода (выше/ниже узла контроля на объекте)
Таблица: Учета суточных расходов (Дата, Код объекта, Код статьи расхода, Код локации, Количество)

Нужно организовать табличную форму ввода информации и хотелось бы в виде:

   Дата       Название    Себе        Людям        .......
              объекта   ниже выше   ниже выше     ниже выше

09.10.2017    Object1    0    5       4    2       3   0

Можно такое сбацать встроенными или сторонними контролами Access 2003, и куда копать?

http://www.sql.ru/forum/1273572/forma-vvoda-dannyh

Помогите найти ошибку в запросе на обновление.

, SCRINING_DATA_NAZNACHENO = " & FormatSpDate(rst("SCRINING_DATA_NAZNACHENO")) & "

Вот так

         CurrentDb.Execute "Update SPR_SCRINING_TIPS_TBL SET SCRINING_PRIMENITb = " & rst("PRIMENITb") & " where SCRINING_KOD = " & rst("SCRINING_KOD")

ошибки нет
------------------------------------------------------------------------
Спасибо за ответ.

http://www.sql.ru/forum/1273543/oshibka-sintaksisa

Добрый день
Есть форма, источником данных для которой является Таблица "Smena_otbor". из этой формы можно перейти в другую, источником данных для которой будет та же таблица. Соответственно при попытке каких либо действий во второй форме вылетает ошибка
"Таблица 'smena_otbor' не может быть заблокирована ядром базы данных. Она уже используется другим пользователем или процессом".
Как можно разорвать связь первой формы с таблицей без закрытия самой формы?

http://www.sql.ru/forum/1273520/razryv-svyazi-s-tablicey

Добрый день подскажиет как объеденить столбцы в SQL запросе через VBA tblAuto.AutoMarka " & & " tblAuto.AutoModel

http://www.sql.ru/forum/1273492/obedenit-stolbcy-sql-zaprosa-cherez-vba