Unable to split date string in access?

[ugly]

Unable to split date string in access?

I need to split a date that is in the the form of a string, they must be declared as strings and not dates. The problem is that I cannot extract the day using day(dateStr), month(dateStr) and year(dateStr). These funtions produce a type error 13 type mismatch.


Dim dateStr As String
Dim dateStr2 As String

'dateStr2 = hold1 & "/" & hold2 & "/" & hold3
dateStr2 = "01/12/2008"
dateStr = Format(dateStr2, "dd/mm/yyyy")
Debug.Print day(dateStr)

 

[MakeItSo]

You are so close to the solution, you know:

The day function expects a date, not a string.
This works fine for me:

Sub test()

Dim daystr As Date
Dim daystr2 As String

daystr2 = "11.02.2008"
daystr = CDate(daystr2)

MsgBox Day(daystr)

End Sub

;-)

[navy]"We had to turn off that service to comply with the CDA Bill."[/navy]
- The Bastard Operator From Hell

 

[ugly]

Hi Thanks for you help tried this but still failling
Dim daystr As Date
Dim daystr2 As String

daystr2 = "11/02/2008"
daystr = CDate(daystr2)

MsgBox day(daystr) is failling here mismatch error

 

[MakeItSo]

???

It does work on my side.
Is this all your code, or are you hiding a bit? Be honest!


[navy]"We had to turn off that service to comply with the CDA Bill."[/navy]
- The Bastard Operator From Hell

 

[ugly]

Many thanks yes I was using 31 on a month that doesn't have 31!!! Thanks!

 

[MakeItSo]

Ah yes, this sounds familiar... :-D

[navy]"We had to turn off that service to comply with the CDA Bill."[/navy]
- The Bastard Operator From Hell