date or a calendar in a different language ??

[eli7]

How could I get a date or a calendar in a different language, I am using access 2000, the language in operating system is set to the language I am trying to get in access but for some reason it doesn’t work, is deer any way that I could get the date in different language.

The date in my machine is giving me back the right date off the other language by pointing to the system clock on the right corer off the screen but in access it doesn’t give me back that date by using now () or date (), it only gives me back the regular English date

Some one gave me a function called SYSTEMTIME and I have tried using it but It doesn’t seem to work the code for the systemtime is

In the form using a command button
Private Declare Sub GetSystemTime Lib "kernel32" (lpSystemTime _
As SYSTEMTIME)
Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type
Private Sub sys_Click()
Dim SysTime As SYSTEMTIME
Call GetSystemTime(SysTime)
txt = SysTime.wMonth & "/" & SysTime.wDay & "/" & SysTime.wYear
End Sub

In the module
Public Declare Function SystemTimeToTzSpecificLocalTime Lib "kernel32" _
(lpTimeZoneInformation As TIME_ZONE_INFORMATION, lpUniversalTime As SYSTEMTIME, _
lpLocalTime As SYSTEMTIME) As Long

Public Declare Function GetTimeZoneInformation Lib "kernel32" _
(lpTimeZoneInformation As TIME_ZONE_INFORMATION) As Long

Public Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type

Public Type TIME_ZONE_INFORMATION
Bias As Long
StandardName(32) As Integer
StandardDate As SYSTEMTIME
StandardBias As Long
DaylightName(32) As Integer
DaylightDate As SYSTEMTIME
DaylightBias As Long
End Type

Please help

 

[WaltLukeIII]

Am I to understand that The date/time that you are getting is correct you just need to translate it? IF so then I would just use a Case statement or if else statement.

Walt III
SAElukewl@netscape.net

http://www.muc.edu/~lukewl

 

[DougP]

I stopped using Now() because it does not work right all the time.
see if this will work

myDate = format(now,"dd/mm/yy&quot

DougP, MCP
dposton@universal1.com

Ask me how Bar-codes can help you be more productive.