Hi there Oneeye,
This
article from the 4GuysFromRolla site looks like it should answer your question. They use a function to ensure that no matter what the native environment, the date string will be read in "dd-MMM-yyy" format.
Function MediumDate (str)
Dim aDay
Dim aMonth
Dim aYear
aDay = Day(str)
aMonth = Monthname(Month(str),True)
aYear = Year(str)
MediumDate = aDay & "-" & aMonth & "-" & aYear
End Function
An example showing how you might use it with a database update:
strSQLUpdate = "UPDATE tblOrders " & _
"SET fldDateOrdered = #" & MediumDate( Date() ) & "# " & _
"WHERE fldStatus = open ; "
Let me know how you get on,
Paul