Создание кнопки для сохранения записи

[Dmitriy_Egorov]

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

Создал форму на основе таблицы. Как сделать так, что бы данные добавлялись в таблицу только после нажатия кнопки, например "Сохранить данные"
Если переходить с поля на поле по клавише Tab и после того как оказался на последнем элементе формы нажать Tab еще раз, то запись автоматически сохраняется в таблице, а курсор попадает на первое поле формы. Как изменить такое поведение формы, т.е. пока не будет нажата кнопка "Сохранить данные" новая запись в таблице не создавалась. Может быть необходимо изменить какие то свойства для формы?

И еще вопрос.
Если необходимо изменить какую нибудь запись в таблице, например за определенную дату, то как это можно сделать используя форму? Как я понимаю сначала необходимо создать запрос с параметрами и на основе этого запроса создать форму.

Спасибо!

[was3110]

в окне свойст для формы запретить добавление строк
и написать обработчик события Клик по кнопке.
(Подробнее в личку, связь в профиле)

[Abrakadabra]

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

в окне свойст для формы запретить добавление строк
и написать обработчик события Клик по кнопке.
(Подробнее в личку, связь в профиле)

Велосипед изобретать не надо.
Есть стандартные решения, в т.ч. и от MS. Две кнопки-одна сохоанить, вторая-откат

[Dmitriy_Egorov]

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

Велосипед изобретать не надо.
Есть стандартные решения, в т.ч. и от MS. Две кнопки-одна сохоанить, вторая-откат

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

И еще.
Я открываю форму, ввожу данные в одно из полей, закрываю форму (не нажимая кнопки сохранить запись). Открываю таблицу, а там уже создана запись.
Подскажите пож-ста какие свойства формы необходимо изменить что бы данные в таблицу сохранялись только после нажатия кнопки "сохранить запись"

[R Dmitry]

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

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

И еще.
Я открываю форму, ввожу данные в одно из полей, закрываю форму (не нажимая кнопки сохранить запись). Открываю таблицу, а там уже создана запись.
Подскажите пож-ста какие свойства формы необходимо изменить что бы данные в таблицу сохранялись только после нажатия кнопки "сохранить запись"

если нужно только добавлять записи по команде, то лучше это сделать через запись данных в таблицу SQL запросом.

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

[Dmitriy_Egorov]

Сообщение от R Dmitry

если нужно только добавлять записи по команде, то лучше это сделать через запись данных в таблицу SQL запросом.

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

Вы говорите о простом запросе, который создается в access или я не правильно Вас понял?
И что значит собрать записи с полей и программно записать их в таблицу.
Расскажите пож-ста по подробней

[LittleFatCat]

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

Например, на форме есть поля TabNum, LName, FName, MName. Есть таблица Persons, с полями Tabnum(числовое), LastName, FirstName, MidName (текстовые).
Тогда запрос, вставляющий запись в таблцу, выглядит так:
strSQL = "INSERT INTO Persons (TabNum, LastName, FirstName, MidName) " & _
"VALUES (" & TabNum.Value & ", '" & LName.Value & "', '" & _
FName.Value & "', '" & MName.Value & "')"
При нажатии кнопки "Сохранить" проверяется заполнение нужных полей, формируется строка запроса на добавление (аналогично примеру) и запускается
командой CurrentDB.Execute (strSQL) (для DAO-модели доступа к данным)

[Dmitriy_Egorov]

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

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

Например, на форме есть поля TabNum, LName, FName, MName. Есть таблица Persons, с полями Tabnum(числовое), LastName, FirstName, MidName (текстовые).
Тогда запрос, вставляющий запись в таблцу, выглядит так:
strSQL = "INSERT INTO Persons (TabNum, LastName, FirstName, MidName) " & _
"VALUES (" & TabNum.Value & ", '" & LName.Value & "', '" & _
FName.Value & "', '" & MName.Value & "')"
При нажатии кнопки "Сохранить" проверяется заполнение нужных полей, формируется строка запроса на добавление (аналогично примеру) и запускается
командой CurrentDB.Execute (strSQL) (для DAO-модели доступа к данным)

Если не трудно привяжите запрос к кнопке на форме.

[LittleFatCat]

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

Для Вашей формы необходимо в свойствах кнопки "Сохранить" на вкладке события в событии "Нажатие кнопки" выбрать [Процедура обработки события] и в окне редактора кода VBA ввести следующий код:

Dim strSQL As String
  If MsgBox("Сохранить текущую запись?", vbQuestion + vbYesNo + vbDefaultButton2, "Сохранение записи") <> vbYes Then Exit Sub
  strSQL = "INSERT INTO Kassa1 (Data, Касса, Nal5000, Nal1000, Nal500, Nal100, Nal50, Meloch, Nal-X, VyrChist-Z, VyrObch-Z, Trafik)" & _
   " VALUES (" & _
   "#" & Дата.Value & "#, " & _
   "'" & Касса.Value & "', " & _
   [5000].Value & ", " & [1000].Value & ", " & [500].Value & ", " & [100].Value & ", " & [50].Value & ", " & Мелочь.Value & ", " & _
   [Нал по Х - отчету].Value & ", " & [Выручка чист по Z - отчету].Value & ", " & [Выручка общ по Z - отчету].Value & ", " & _
   Трафик.Value & ")"
  CurrentDb.Execute (strSQL)

Ещё, ИМХО :
Называть поле с датой Data не есть хорошо - оно может быть интерпретировано как служебное. (Data, кстати - это данные, а дата - Date :-). Лучше называть производными словами, например, InputDate, InsertDate и т.д. Называть поля в таблице и по-русски, и по-английски тоже неправильно, особенно если они могут быть прочитаны и так и так - Касса? На форме названия полей (не подписи!) лучше делать в одно слово и начинать с буквы. Идеально - если поле на форме называется также, как и поле с данными в таблице БД - это открывает простор для манипулирования с кодом и другие интересные вещи. И конкретно для Вашего случая нужны две формы - на одной (которая будет для добавления) данные в полях нужно очистить (чтобы поле имело вид СВОБОДНЫЙ)

[Dmitriy_Egorov]

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

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

Для Вашей формы необходимо в свойствах кнопки "Сохранить" на вкладке события в событии "Нажатие кнопки" выбрать [Процедура обработки события] и в окне редактора кода VBA ввести следующий код:

Dim strSQL As String
  If MsgBox("Сохранить текущую запись?", vbQuestion + vbYesNo + vbDefaultButton2, "Сохранение записи") <> vbYes Then Exit Sub
  strSQL = "INSERT INTO Kassa1 (Data, Касса, Nal5000, Nal1000, Nal500, Nal100, Nal50, Meloch, Nal-X, VyrChist-Z, VyrObch-Z, Trafik)" & _
   " VALUES (" & _
   "#" & Дата.Value & "#, " & _
   "'" & Касса.Value & "', " & _
   [5000].Value & ", " & [1000].Value & ", " & [500].Value & ", " & [100].Value & ", " & [50].Value & ", " & Мелочь.Value & ", " & _
   [Нал по Х - отчету].Value & ", " & [Выручка чист по Z - отчету].Value & ", " & [Выручка общ по Z - отчету].Value & ", " & _
   Трафик.Value & ")"
  CurrentDb.Execute (strSQL)

Ещё, ИМХО :
Называть поле с датой Data не есть хорошо - оно может быть интерпретировано как служебное. (Data, кстати - это данные, а дата - Date :-). Лучше называть производными словами, например, InputDate, InsertDate и т.д. Называть поля в таблице и по-русски, и по-английски тоже неправильно, особенно если они могут быть прочитаны и так и так - Касса? На форме названия полей (не подписи!) лучше делать в одно слово и начинать с буквы. Идеально - если поле на форме называется также, как и поле с данными в таблице БД - это открывает простор для манипулирования с кодом и другие интересные вещи. И конкретно для Вашего случая нужны две формы - на одной (которая будет для добавления) данные в полях нужно очистить (чтобы поле имело вид СВОБОДНЫЙ)

Спасибо большое за такой ответ. Но я тут решил полностью изменить структуру БД.
Опять куча вопросов. Если не трудно объясните.
Создал таблицу "Главная касса" - это как бы сводная таблица, в которой должны сохраняться суммарные данные из других таблиц.
Например, в поле "Банк" должна сохраняться сумма денег которые сданы в банк, а точнее сумма полей из таблицы "инкассация" поля "5000руб" "1000руб" "500руб". Это числовые поля т.к. в них вносится не сумма денег, а количество купюр соответствующего номинала. Т.е. число в поле должно умножаться на номинал купюры и сумма этих полей должна сохраняться в поле "Банк" таблицы "Главная касса"
Еще хотел узнать нужно ли создавать ключевые поля "ID" в каждой таблице что бы по ним связать таблицы или связь можно сделать по полям "Дата", т.к. в каждой таблице должна быть только одна запись за каждую дату. И не будет ли осложнений в будущем.
Хочу создать несколько форм. Главной будет форма "Главная касса" а из нее будут открываться остальные формы: "Инкассация", "Касса1", "Касса2", "Касса3", "Касса4", а вот как создать эти формы я не пойму. Точнее не понимаю как создать форму "главная касса" или запрос на основании которого должна формироваться эта форма.
Дело в том, что я совсем не знаю VBA и пытаюсь сделать без применения оного.
Пробовал создавать запрос с вычисляемыми полями, но постоянно вылезают ошибки.