ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Вопрос по ListBox
18 сообщений из 18, страница 1 из 1
Вопрос по ListBox
    #32066375
Фотография MichaelGK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MichaelGK
Участник
ADP MSAXP+MSSQL2000.
На бефор апдейт листбокса спрашиваю юзера "Продолжить или откатить?"... Если юзер отвечает "No" делаю Cancel = True... Но в листбоксе остается новое значение!!!... Дописал реквери листбокса, начинается ругань: "Перед обновлением нужно сохранить значение поля"... Как это дело грамотно разрешить, т.е. откатить листокс в исходное состояние?
...
Рейтинг: 0 / 0
11.11.2002, 11:42
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066425
Фотография MichaelGK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MichaelGK
Участник
Господа программеры, Help..
...
Рейтинг: 0 / 0
11.11.2002, 13:04
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066442
Фотография Latuk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Latuk
Участник
Попробуй SendKeys "{Esc}"
...
Рейтинг: 0 / 0
11.11.2002, 13:34
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066452
Фотография MichaelGK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MichaelGK
Участник
Годится... Latuk, благодарю...
...
Рейтинг: 0 / 0
11.11.2002, 13:46
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066467
ДиД
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ДиД
Гость
ПолеСоСписком.Undo
...
Рейтинг: 0 / 0
11.11.2002, 13:59
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066520
Фотография MichaelGK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MichaelGK
Участник
То Дид.
Undo почему-то не проходит...
...
Рейтинг: 0 / 0
11.11.2002, 14:59
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066526
ДиД
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ДиД
Гость
У меня так работает
Private Sub InMinimal_BeforeUpdate(Cancel As Integer)
Cancel = True
InMinimal.Undo
End Sub
...
Рейтинг: 0 / 0
11.11.2002, 15:11
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32066533
Фотография MichaelGK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MichaelGK
Участник
Да, тоже самое, но не проходит... без всяких сообщений, просто оставляет новое значение. А по ЗендКейсу все нормально... Сомнительно, но может сказывается, что у меня источник - список значений... на источнике - запросе или таблице я не пробывал, некогда.
...
Рейтинг: 0 / 0
11.11.2002, 15:21
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
Вопрос по ListBox
    #32374515
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
Уважаемые волшебники! -:))
А как тоже самое сделать у ПолеСоСписком?
...
Рейтинг: 0 / 0
13.01.2004, 14:57
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374529
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
тоже самое - сделать точно так же
...
Рейтинг: 0 / 0
13.01.2004, 15:02
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374560
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
Привет ЛП!
Чевото у меня... это... того ... никак.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub ПолеСоСписком38_AfterUpdate()
Dim response
If IsNull(ПолеСоСписком16) = True Then
response = MsgBox( "Пожалуйста, выберите месяц." , vbInformation)
SendKeys  "{Esc}" 
DoCmd.GoToControl  "ПолеСоСписком16" 
ПолеСоСписком16.Dropdown
Exit Sub
End If
end sub


Где у меня ошибка? Может потому что у меня все это на событиии AfterUpdate?
...
Рейтинг: 0 / 0
13.01.2004, 15:11
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374586
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Где у меня ошибка?
Не напрашивайся :)

Может потому что у меня все это на событиии AfterUpdate?
Почему-то я в этом уверен
...
Рейтинг: 0 / 0
13.01.2004, 15:20
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374624
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
Чего-то не выходит. Я уже и вот так попробовал:

Код: plaintext
1.
2.
3.
Private Sub ПолеСоСписком38_BeforeUpdate(Cancel As Integer)
Cancel = True
Me.ПолеСоСписком38.Undo
End Sub


У меня Access'97, mdb.
Тип источника строк: список значений (2001,2002,2003,...)
Значение по умолчанию: =Year(Now())
...
Рейтинг: 0 / 0
13.01.2004, 15:41
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374627
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Свободный контрол или связанный?
Если свободный - то SendKeys. На BeforeUpdate.
...
Рейтинг: 0 / 0
13.01.2004, 15:42
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374731
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
Помоему свободный... В данном случае в него значения забиты.
И почему-то не работает....
...
Рейтинг: 0 / 0
13.01.2004, 16:19
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32374733
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
И он ни счем не связан...
...
Рейтинг: 0 / 0
13.01.2004, 16:20
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32375323
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
TO> ЛП...

Попробовал так как ты посоветовал, но таже бредятина, не работает и все тут...

Стал разбираться и выяснилось, что не работало почему-то из-за того, что у меня с начала шел MsgBox, а потом SendKeys "{Esc}".

Поставил SendKeys "{Esc}" в начало и все заработало.

З.Ыэ Почему так? Может кто объяснит?
...
Рейтинг: 0 / 0
14.01.2004, 10:40
| Ответить | Цитировать | Написать  
Вопрос по ListBox
    #32375330
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Потому что у тебя месседжбокс и ловил этот самый ESC
А надо было, чтобы ловил его листбокс
...
Рейтинг: 0 / 0
14.01.2004, 10:45
| Ответить | Цитировать | Написать  
18 сообщений из 18, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Вопрос по ListBox
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32374560&tid=1677230]:
 0ms
get settings:
 5ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 188ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 56ms
get tp. blocked users:
 2ms
others: 208ms
total:  494ms
созд. / загр.: 494ms
x
x
Закрыть


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