powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Период от выбранного месяца
7 сообщений из 7, страница 1 из 1
Период от выбранного месяца
    #34224288
nova
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
Есть меню с выбором месяца. При выборе месяца двум переменным необходимо присвоить начало месяца и конец месяца соответственно, учитывая, что есть высокосный год. Есть ли простое решение или надо создавать свою функцию?
Спасибо!
...
Рейтинг: 0 / 0
Период от выбранного месяца
    #34224326
Maltsev Max
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
VibMonth= 3 
VibYear= 2006 

Dt_Top=CToD('01.'+Padl(AllTrim(Str(VibMonth)), 2 ,'0')+'.'+Str(VibYear, 4 ))

Dt_End=Dt_Top+ 32 
Dt_End=Ctod('01.'+Padl(AllTrim(Str(Month(Dt_End))), 2 ,'0')+'.'+Str(Year(Dt_End), 4 ))- 1 

...
Рейтинг: 0 / 0
Период от выбранного месяца
    #34224342
alex11100
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
изв. не пробую код, но прибл. так

Код: plaintext
1.
2.
3.
4.
5.
6.
set date british
local lnMonth, lnYear, ldStartDate, ldEndDate
lnMonth =  10 
lnYear   =  2006 
ldStartDate = ctod('01/'+allt(str(lnMonth))+'/'+allt(str(lnYear)))
ldEndDate   = gomonth(ldStartDate, 1 )- 1 

удачи
...
Рейтинг: 0 / 0
Период от выбранного месяца
    #34224373
Maltsev Max
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
gomonth()
:-))
А я вечно все через .... делал.
...
Рейтинг: 0 / 0
Период от выбранного месяца
    #34224394
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Начиная с версии VFP6 можно сформировать значение даты через функцию Date(). Вне зависимости от текущих настроек SET DATE.

Код: plaintext
1.
2.
3.
4.
5.
local lnMonth, lnYear, ldStartDate, ldEndDate
lnMonth =  10 
lnYear   =  2006 
ldStartDate = DATE(m.lnYear, m.lnMonth,  1 )
ldEndDate   = gomonth(m.ldStartDate, 1 )- 1 
...
Рейтинг: 0 / 0
Период от выбранного месяца
    #34224477
Urri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему-то никто не вспомнил:
Код: plaintext
1.
2.
ldStartDate = Date()
ldStartDate = ldStartDate - Day(ldStartDate) +  1 
ldEndDate = Gomonth(ldStartDate,  1 ) -  1 
...
Рейтинг: 0 / 0
Период от выбранного месяца
    #34225335
Буквально вчера делал....
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Период от выбранного месяца
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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