|
|
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
А должен бы. Как сделать, чтобы при закрытии формы данные в таблицу ёйную не добавлялись? А то они добавляются. А это грустно. Получается куча полузаполненных строчек. ("Обязательные" поля использовать не могу) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:16 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
На закрытие формы повесь что-то типа: MsgBox "Сохранить записи?", vbYesNoCancel - прмерно так, точно не помню... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:28 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
...да, ну и конечно, проверку, типа: если Yes, то тырым-бырым, а если No, то тарам -барам, у уж коль Cancel, то трам-пам-пам... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:30 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
мда... ничего более полезного я еще пока в этой жизни не видел. ОГРОМНОЕ тебе пасиба!!! А поконкретнее низя никак, нет? А то я пишу тырым-бырым, но че-то не срабатывает... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:35 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
если Yes, то тырым-бырым - никаких действий. Запись сохраняется. а если No, то тарам -барам - вероятно Me.Undo у уж коль Cancel, то трам-пам-пам - если по событию Unload формы, то Cancel = True, и форма не закроется. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:44 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
Так ты читай между строк: вместо бесполезных словосочетаний типа тырым-бырым необходимо поставить код, который бы выполнял добавление, удаление либо отмену выхода из формы в зависимости от нажатой кнопочки... если эти строки ни о чем Вам не говорят, то обратитесь в справку MS Office. С уважением... А если серьезно, то поработай над обработкой результа мессаджебокса... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:48 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
Private Sub Form_BeforeUpdate(Cancel As Integer) If Not MyCondition() Then Cancel = True SendKeys "{esc}" End If End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:53 |
|
||
|
Почему ввод не отменяется?
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. 13. Если самому лень, то лови... Что-то типа того. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.09.2003, 11:53 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32279209&tid=1679152]: |
0ms |
get settings: |
8ms |
get forum list: |
18ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
160ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
48ms |
get tp. blocked users: |
2ms |
| others: | 241ms |
| total: | 497ms |

| 0 / 0 |
