Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.03.2013, 11:33   #1
at.kon
Новичок
Джуниор
 
Регистрация: 22.03.2013
Сообщений: 2
По умолчанию При наличии именниников в запросе, стартовать форму

Всем доброго дня.
Access:
Столкнулся с такой задачей, стартует начальная форма «День рождения», если в запросе «Т1» есть на сегодня именинник, то стартует другая форма. Как построить код?
Заранее спасибо!


_________
Название темы должно адекватно отражать суть решаемой задачи/проблемы.
На первый раз я исправил.
В дальнейшем темы с подобным названием будут закрываться/удаляться,
а автор такой темы получать штрафы.

Прошу учесть на будущее...

Модератор.

Последний раз редактировалось Serge_Bliznykov; 22.03.2013 в 11:41.
at.kon вне форума Ответить с цитированием
Старый 22.03.2013, 15:56   #2
Myhaylo
Форумчанин
 
Регистрация: 19.07.2012
Сообщений: 520
По умолчанию

if DLookup("Дата_рожд","Таблица","Дата _рожд=Date()") then DoCmd.OpenForm "Форма"
Окупант, руки прочь от Украины!!! Слава Героям!

Последний раз редактировалось Myhaylo; 22.03.2013 в 15:58.
Myhaylo вне форума Ответить с цитированием
Старый 22.03.2013, 20:31   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Myhaylo, ну нет, так легко не получится. Именинник, это же тот, у кого сегодня совпадает дата и месяц, год обычно (если речь не идёт о новорожденных) не совпадает!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 22.03.2013, 21:40   #4
Myhaylo
Форумчанин
 
Регистрация: 19.07.2012
Сообщений: 520
По умолчанию

Да, конечно, виноват:

if DLookup("Дата_рожд","Таблица","Day( Дата_рожд)=Day(Date()) AND Month(Дата_рожд)=Month(Date())") then DoCmd.OpenForm "Форма"
Окупант, руки прочь от Украины!!! Слава Героям!
Myhaylo вне форума Ответить с цитированием
Старый 23.03.2013, 12:09   #5
at.kon
Новичок
Джуниор
 
Регистрация: 22.03.2013
Сообщений: 2
По умолчанию

Все в норме, заработало. Спасибо огромное!!!
at.kon вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
проблема в работе со строкой при наличии левого слэша ИНDИГО C# (си шарп) 7 15.10.2012 23:40
макрос изменения цвета шрифта ячейки, при наличии определенной буквы Alex_91 Microsoft Office Excel 8 24.05.2012 21:44
Не работает FormKeyPress при наличии на форме кнопки munthrekosh Общие вопросы Delphi 2 21.02.2012 18:34
Заполнение списка по исходным данным при наличии пустых ячеек нгв1607 Microsoft Office Excel 2 04.08.2011 10:27
Vista, тормозит проводник при наличии Интернета Beermonza Windows 8 04.11.2009 17:11