powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Добавить в таблицу запись из формы
3 сообщений из 3, страница 1 из 1
Добавить в таблицу запись из формы
    #32260413
Sergey Ermakov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Требуется простая штука:
- при нажатии в некоторой форме кнопки удаления записи (кнопка добавлена мною), одно из значений поля этой формы надо перенести в строку таблицу "Удаленные" (добавить туда строку с номером удаленной записи);
- при выборе в этой же форме в некотором поле определенной записи из открывающегося списка (источником строк которого является та самая таблица), соответствующую строку этой таблицы надо удалить..

Проблема встала из-за того, что не могу дотюкать, как на VBA открыть таблицу и внести в нее новую строку (и соответственно определенную строку удалить).. Подскажите, пожалуйста..

p.s. в ru.access (fido7.access) что-то прозрачно намекали на отчеты на добавление/удаление.. Это имеет сюда отношение?
...
Рейтинг: 0 / 0
Добавить в таблицу запись из формы
    #32260416
VasiliyFM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Либо INSERT INTO либо Recordset.AddNew
...
Рейтинг: 0 / 0
Добавить в таблицу запись из формы
    #32260722
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
если все нужные данные в полях текущей записи -> INSERT INTO ... VALUES (значения полей)
в противном случае если есть ID то
Код: plaintext
1.
2.
Set rst = Me.RecordsetClone
rst.MoveFirst  "ID="  & значение_id
CurrentDb.Execute  "INSERT INTO ...... VALUES (rst.Fields(" Имя_поял_или_его_номер") ....)

2)
Код: plaintext
CurrentDb.Execute  "DELETE * FROM Table1 WHERE Id="  & значение_id
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Добавить в таблицу запись из формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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