powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Почему ввод не отменяется?
9 сообщений из 9, страница 1 из 1
Почему ввод не отменяется?
    #32279184
Sw_Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А должен бы. Как сделать, чтобы при закрытии формы данные в таблицу ёйную не добавлялись? А то они добавляются. А это грустно. Получается куча полузаполненных строчек. ("Обязательные" поля использовать не могу)
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279209
G&P
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
На закрытие формы повесь что-то типа:
MsgBox "Сохранить записи?", vbYesNoCancel
- прмерно так, точно не помню...
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279215
G&P
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...да, ну и конечно, проверку, типа:
если Yes, то тырым-бырым,
а если No, то тарам -барам,
у уж коль Cancel, то трам-пам-пам...
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279229
Sw_Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
мда... ничего более полезного я еще пока в этой жизни не видел. ОГРОМНОЕ тебе пасиба!!!
А поконкретнее низя никак, нет? А то я пишу тырым-бырым, но че-то не срабатывает...
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279244
если Yes, то тырым-бырым - никаких действий. Запись сохраняется.
а если No, то тарам -барам - вероятно Me.Undo
у уж коль Cancel, то трам-пам-пам - если по событию Unload формы, то Cancel = True, и форма не закроется.
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279254
G&P
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так ты читай между строк:
вместо бесполезных словосочетаний типа тырым-бырым необходимо поставить код, который бы выполнял добавление, удаление либо отмену выхода из формы в зависимости от нажатой кнопочки... если эти строки ни о чем Вам не говорят, то обратитесь в справку MS Office. С уважением...


А если серьезно, то поработай над обработкой результа мессаджебокса...
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279267
Фотография PA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Not MyCondition() Then
Cancel = True
SendKeys "{esc}"
End If
End Sub
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279268
G&P
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Private Sub Кнопка43_Click()
Dim strmsg As VbMsgBoxResult
strmsg = MsgBox( "             Сохранить запись?" , vbYesNoCancel,  "Сохранение." )
If strmsg = vbYes Then
'Сохраняем текущую запись таблицы "Расходы":
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Else
  If strmsg = vbNo Then
  'Удаляем запись:
  DoCmd.DoMenuItem acFormBar, acEditMenu,  8 , , acMenuVer70
  DoCmd.DoMenuItem acFormBar, acEditMenu,  6 , , acMenuVer70
  End If
End If
End Sub


Если самому лень, то лови... Что-то типа того.
...
Рейтинг: 0 / 0
Почему ввод не отменяется?
    #32279281
Sw_Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ок, пасиба, вроде как что-то как-то заработало.
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Почему ввод не отменяется?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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