Есть числа (точнее 4 байта, которые нужно привести с числу) - количество секунд пройдённых после 01.01.2000 года, к примеру 686361600
Нужно привести это число к дате-время:
Какой год выбрать не проблема:
[code]
m1=Asc(Substr(liMP,4,1))*256*256*256
m2=Asc(Substr(liMP,3,1))*256*256
m3=Asc(Substr(liMP,2,1))*256
m4=Asc(Substr(liMP,1,1))
mIt=m1+m2+m3+m4
mYear=2000+Int(mIt/3600/24/365)
[/code]
А вот какой месяц вычислить сложнее:
Вычислим отстаток mMonth1=mIt-Int(mIt/3600/24/365)*365*24*3600
Остаток если поделить на 3600/24 получаем 279 дней и вот думаю как по-проще получить номер месяца из количества дней?
Ну или может у кого-то будут идеи как это реализовать более изящно и красиво