powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Настройки даты
4 сообщений из 4, страница 1 из 1
Настройки даты
    #33154869
alexFV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В командном окне VFP5:
Код: plaintext
1.
2.
3.
MyDate=CTOD('01.'+PADL( 3 , 2 ,'0')+'.'+PADL( 4 , 4 ,'0'))
?MyDate

 01 . 03 . 1904 

В VFP8:
Код: plaintext
1.
2.
3.
MyDate=CTOD('01.'+PADL( 3 , 2 ,'0')+'.'+PADL( 4 , 4 ,'0'))
?MyDate

 01 . 03 . 0004 

Что за настройки?...Вообще я бы хотел получить 01.03. 2004
...
Рейтинг: 0 / 0
Настройки даты
    #33154896
АлександрК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SET DATE GERMAN
SET CENTURY ON

MyDate=CTOD('01.'+PADL(3,2,'0')+'.'+ PADL(4,2,'0') )
?MyDate
...
Рейтинг: 0 / 0
Настройки даты
    #33154974
Crispy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
alexFV В VFP8:

MyDate=CTOD('01.'+PADL(3,2,'0')+'.'+PADL(4,4,'0'))
?MyDate

01.03.0004

Что за настройки?...Вообще я бы хотел получить 01.03.2004
Но ведь MyDate=CTOD('01.'+PADL(3,2,'0')+'.'+PADL(4,4,'0')) - то же самое, что
MyDate=CTOD('01.03.0004') !!!
Что же еще может получаться?
Так что правильно написал АлександрК - именно два знака для года - и никаких проблем :).
А разница между VFP5 и VFP8 - кажется, из-за разного диапазона используемых дат в этих версиях. Не знаю точно - кажется с 6 версии такое (может кто-нибудь уточнит).
...
Рейтинг: 0 / 0
Настройки даты
    #33155843
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi alexFV!

в VFP8 вместо жуткого CTOD() гораздо лучше использовать функцию DATE() или DATETIME() - передав параметрами В ЧЁТКОМ ПОРЯДКЕ И БЕЗ ГЛУПЫХ УМОЛЧАНИЙ год, месяц, день...

Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Настройки даты
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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