Regional settings for date format

[GMcFly]

Hello everybody!
I made an access database which works very nicely. There is one problem though. When I started running the database on other computers visual basic started reporting errors when I tried to filter a form with criteria the user can enter in the form. I later found out that the problem was with the user's regional settings. Some use "." as a separator others "/". Is there a way to find out what the settings of the user are?

Thanks for your help!

P.S.: to give an example of my problem:

DoCmd.OutputTo acOutputForm, "frmProducts", acFormatXLS, "s:/filename" & date, True

People using "." as a separator wont have problems, but people with "/" as a separator will because "/" can't be used in a file name.
I'm using the date so the people know what the search criteria for the file was.

 

[cheerio]

Use the Format function to apply your own choice of format. Something like Format(date,"YYYYMMDD&quot would give a file name where the files would appear sorted in date order in Windows Explorer.

Ken

 

[jgoodman00]

I think to interrogate the regional settings you will need to use an api call.

However, it is probably simpler to take control of the date function, & assign it to a string. Loop through the string, replacing the '/' with another character.
e.g.

Dim strDate As String
Dim pos As Integer
Const DATE_SEPERATOR As String = "_"

strDate = Date

Do
pos = InStr(strDate, "/&quot
If pos > 0 Then
strDate = Left(strDate, pos - 1) & DATE_SEPERATOR & Mid(strDate, pos + 1)
End If
Loop While pos > 0 James Goodman MCP

http://www.james-goodman.co.uk

 

[GMcFly]

Stupid me! That easy! Thanks for your help guys!