Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Обновление RecordSource ленточной формы после изменения даты в свободном поле формы / 10 сообщений из 10, страница 1 из 1
12.12.2020, 13:56
    #40027131
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
Здравствуйте!

На ленточной форме есть свободное поле с датой. Когда меняю дату (хоть через встроенный календарик, хоть вручную), то форма обновляется только после нажатия на любом месте формы. В процедуре на После обновления этого поля такой код:
Код: vbnet
1.
2.
Me.RecordSource = "select*from tblFuel where deposit_date=" & Me.dep_date
Me.Requery

но фокус после смены даты остается в поле. Пробовал перенаправить фокус на кнопку Закрыть
Код: vbnet
1.
cmsClose.SetFocus

- никакой реакции..
Подскажите, пж, в каком направлении надо копать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.12.2020, 14:42
    #40027137
DarkMan
DarkMan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
kniga
Код: vbnet
1.
Me.Requery


Попробуйте
Код: vbnet
1.
Me.RecordSource = Me.RecordSource
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.12.2020, 15:16
    #40027142
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
DarkMan,

спасибо за ответ, не помогло. Ну ладно, оставлю как есть или кнопку на обновление под маской "показать" нарисую )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.12.2020, 15:29
    #40027145
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
kniga
Код: vbnet
1.
."..where deposit_date=" & Me.dep_date

А должно быть так:
Код: vbnet
1.
2.
"...deposit_date=#" & Format(Me.dep_date,"mm\/dd\/yy") & "#"
Me.RecordSource = Me.RecordSource
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.12.2020, 16:43
    #40027164
DarkMan
DarkMan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
kniga
Ну ладно, оставлю как есть или кнопку на обновление под маской "показать" нарисую )
Выкладывайте пример формы в студию.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.12.2020, 16:56
    #40027174
DarkMan
DarkMan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
sdku
А должно быть так:
Код: vbnet
1.
2.
"...deposit_date=#" & Format(Me.dep_date,"mm\/dd\/yy") & "#"
Me.RecordSource = Me.RecordSource



А еще лучше ,
Код: vbnet
1.
2.
3.
4.
 Dim strS as string
 strS="select * from tblFuel where deposit_date=#" & Format(Me.dep_date,"mm\/dd\/yy") & "#"
 Me.RecordSource = strS
 Me.RecordSource = Me.RecordSource



Тогда можно посмотреть , что в переменной подсовывается в запрос.
А еще лучше , посмотреть на реальном примере. У всех обновляется , а здесь нет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2020, 01:43
    #40027342
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
DarkMan
Код: vbnet
1.
2.
3.
4.
 Dim strS as string
 strS="select * from tblFuel where deposit_date=#" & Format(Me.dep_date,"mm\/dd\/yy") & "#"
 Me.RecordSource = strS
 Me.RecordSource = Me.RecordSource 'ЭТО ЛИШНЕЕ

...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2020, 13:16
    #40027390
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
Спасибо за коды, к сожалению все так же - при смене даты форма сама не обновляется (
В приложении пример, код спецательно в "оригинале" )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2020, 16:11
    #40027439
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
Вы лучше поясните я понял так:водители заправляют машины оплачивая заправку картой.
Вам нужна инфа: кто,когда и какой автомобиль заправил. Праильно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2020, 16:46
    #40027449
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обновление RecordSource ленточной формы после изменения даты в свободном поле формы
sdku,

авторкогда и какой автомобиль заправил
в общем да. Руководитель отдела логистики таким образом заполняет заявку на пополнение карт и подает в бухгалтерию.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Обновление RecordSource ленточной формы после изменения даты в свободном поле формы / 10 сообщений из 10, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 424ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1609843]:
 0ms
get settings:
 11ms
get forum list:
 11ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 45ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 50ms
get tp. blocked users:
 1ms
others: 284ms
total:  424ms
x
x
Закрыть


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