Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > MS Access > Как создать запрос в Access, добавляющий запись

Автор: slang 6.6.2007, 19:22

Задача заключается в том, как инициировать создание строки (записи) в таблице средствами макроса. Единственным вариантом я нашел открытие запроса, который добавляет строку в таблицу в SQL виде это выглядит так:

Код


INSERT INTO Инвентарные ( КодКниги )
SELECT Книги.КодКниги
FROM Книги
WHERE (((Книги.КодКниги)=[Forms]![Книги]![КодКниги]));

этот код работает хорошо.
Теперь мне понадобилось по аналогии сделать еще один запрос:

Код


INSERT INTO Выдача ( КодЧитателя, КодИнвентарный, ДатаВыдачи, ДатаВозврата )
SELECT Выдача.КодЧитателя, Выдача.КодИнвентарный, Выдача.ДатаВыдачи, Выдача.ДатаВозврата
FROM Выдача
WHERE (((Выдача.КодЧитателя)=[Forms]![Читатели]![КодЧитателя]) AND ((Выдача.КодИнвентарный)=[Forms]![КнигиСвободные]![First-КодИнвентарный]) AND ((Выдача.ДатаВыдачи)=Date()) AND ((Выдача.ДатаВозврата) Is Null));

и вот этот код не работает, ошибок не выдает, но и строку не добавляет.
Может быть кто-то подскажет, как это (добавление записи) можно реализовать избежав запросов, или как исправить этот запрос.

Автор: Akina 6.6.2007, 21:42

Создайте запрос (именно запрос!) с этим текстом. Откройте и заполните форму. Не закрывая ее, попробуйте открыть запрос в режиме просмотра. Если увидите данные, которые должны быть вставлены в таблицу - выполните запрос, включив предварительно сообщения о добавлении записей. Реакция гарантирована.