There is weeks difference using this code to calculate age?? How to so

[compu66]

Hi all,

I am unable to figure out the problem.How there is weeks difference coming up.


If sDOB <> "" And sScheduleDate <> "" Then
If IsDate(sDOB) And IsDate(sScheduleDate) Then
Try
sDOB = Convert.ToDateTime(sDOB)
sScheduleDate = Convert.ToDateTime(sScheduleDate)

'CALCULATE NUMBER OF YEARS
sMonths = DateDiff(DateInterval.Month, sDOB, sScheduleDate)

'Calculate the Months
'sMonths = (DateDiff("m", sDOB, sScheduleDate))
If (DatePart("d", sDOB) > DatePart("d", sScheduleDate)) Then
sMonths = sMonths - 1

End If
If sMonths < 0 Then
sMonths = sMonths + 1
End If

sYears = Math.Floor(sMonths / 12)
sMonths = CInt(sMonths Mod 12)

Return CStr(sYears) & " years " & CStr(sMonths) & " Months"

End Function

Thanks for any help in advance.

 

[ca8msm]

If you use the Subtract method of a date, you can return a TimeSpan object which has all of these properties built in e.g.

        Dim d1 As New DateTime
        Dim d2 As New DateTime
        Dim t As New TimeSpan
        t = d2.Subtract(d1)

Then check out whatever properties of the "t" variable are appropriate.


-------------------------------------------------------

Mark,
[URL unfurl="true"]http://aspnetlibrary.com[/url]
[URL unfurl="true"]http://mdssolutions.co.uk[/url] - Delivering professional ASP.NET solutions
[URL unfurl="true"]http://weblogs.asp.net/marksmith[/url]

 

[compu66]

for example the age of one person is 63yrs and 7.5 months and my code is showing 63yrs and 7 months its off by feww weeks.I think any mathimatical operator that is used might be rounding 7.5 to 7 and showing.

 

[ca8msm]

It's probably just showing full completed months


-------------------------------------------------------

Mark,
[URL unfurl="true"]http://aspnetlibrary.com[/url]
[URL unfurl="true"]http://mdssolutions.co.uk[/url] - Delivering professional ASP.NET solutions
[URL unfurl="true"]http://weblogs.asp.net/marksmith[/url]

 

[compu66]

so I want to show the exact dob including that .5 months.Is it possible.

Thanks.

 

[ca8msm]

Yes, use the TimeSpan object as I suggested above.


-------------------------------------------------------

Mark,
[URL unfurl="true"]http://aspnetlibrary.com[/url]
[URL unfurl="true"]http://mdssolutions.co.uk[/url] - Delivering professional ASP.NET solutions
[URL unfurl="true"]http://weblogs.asp.net/marksmith[/url]