[AccessD] adhbCalendar returns INCORRECT value?!

SD,
 
So I presume that Me.Year, Me.Month, Me.Day are all separate text boxes, have you tried the following :
 
            Dim dtDate as Date
            dtDate = Me.Day & “/” & Me.Month & “/” & Me.Year
 
Paul






Message date : Feb 16 2004, 09:31 AM
>From : "S D" 
To : "Access Developers discussion and problem solving" 
Copy to : 
Subject : Re: [AccessD] adhbCalendar returns INCORRECT value?!
Nope. 
Tried that already.
thnx for the tip anyway

paul.hartland at fsmail.net wrote:
SD,
Don't know if it will help but try this :
Public Property Get Value() As Date
Value = Format(DateSerial( Me.Year, Me.Month, Me.Day),"DD/MM.YYYY")
End Property

Paul





Message date : Feb 16 2004, 09:06 AM
>From : "S D" 
To : "accessd" 
Copy to : 
Subject : [AccessD] adhbCalendar returns INCORRECT value?!
Hi group,

I'm going nuts! I'm using the calendar form from the ADHB 2000 and it returns the WRONG value!?

When I select januari 4th 2004 (wich is a sunday) it returns April 1st 2004!! How is this possible?

The function below has the following values (after selecting januari 4th 2004):
Year = 2004
Month = 1
Day = 4

Public Property Get Value() As Date
Value = DateSerial( _
Me.Year, Me.Month, Me.Day)
End Property

i'm using 
A2k english
Win2000 (reg settings => english; date = dd/mm/yyyy)

Please help me out.

Regards

SD



---------------------------------
Do you Yahoo!?
Yahoo! Finance: Get your refund fast by filing online
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
Freeserve AnyTime - HALF PRICE for the first 3 months - Save £7.50 a month 
www.freeserve.com/anytime
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

---------------------------------
Do you Yahoo!?
Yahoo! Finance: Get your refund fast by filing online
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
Freeserve AnyTime - HALF PRICE for the first 3 months - Save £7.50 a month 
www.freeserve.com/anytime