Regional Settings at run time

[Richyrich]

I am trying to pick up some of the regional settings when I load an access database. My users are having their profiles re-set due to some issues with Novell and NT not working well toegether?

Anyway a new profile consists of everything being re-set to an American format which causes all sorts of disasters.(I set all the settings myself manually!!).

What I want to do is pick up the regional settings and inform the user to set them correctly or even set them myself at run-time.

I am not an expert with the registry and have not yet had chance to read the section on API. However I thought there might be a simple way to complete this excersize hence the thread.

The other spanner is that I do not have admin rights to the registry as I am classed a normal user.

[Mark Sreeves]

this should enable you to identify whether the regional settings are American or not and you'll at least be able to notify the user to change the settings

Private Function IsUsDate() As Boolean

Select Case Val(Format("02/01", "dd"))
  Case 1
    'system thinks months come first
    'eg US date format
    
    IsUsDate = True
  
  Case 2
    'system thinks days come first
    'eg UK date format
    IsUsDate = False
  
  Case Else
    Debug.Assert False
  
End Select

End Function