Разница между датами

[wowa]

Дано поле "BirthDay" и текущая дата, необходимо определить сколько человеку полных лет!

Делаю так:

' получение текущей даты
Set dtCurrentDate = New NotesDateTime (Now())

' получение даты рождения
Set dtReception = New NotesDateTime( doc.GetItemValue("BirthDay")(0) )

' разница между текущей даты и dtReception
iDayDifference = dtCurrentDate.TimeDifference( dtReception )/31536000

Я смотрю что выводит не полных лет, а вроде округляет в +1, конечно можно отнять "-1", но не факт что всем округляет на "+1".. Поэтому и хочу спросить что делать??? Может кто сталкивался с таким?

 

[Medevic]

Так ты не посчитаешь.
Нужно:
1) Вычесть года рождения из текущего года.
2) Если текущий день и месяц меньше дня и месяца рождения, то вычитаешь еще 1.

 

[wowa]

Medevic , спасибо, +1