On Aug 28, 2006, at 9:26 AM, Keith Bennett wrote:
A relatively easy "cure" is to generate dates manually. Of course,
this
might not conform to the user's localization settings (eg, mm/dd/yy vs
dd/mm/yy, etc).
Function GetShortDate(d As Date) As String
Return Str(d.Day) + "/" + Str(d.Month) + "/" + Str(d.Year)
End Function
That's essentially what I ended up doing.
Dim d As date
Dim s,t As String
Dim b As boolean
if me.text<>"" then
s=me.text
b=parsedate(s,d)
#If not TargetWin32 then //Mac only
if b then
t=d.shortDate // valid entry?
else
t="ERROR"
end if
#else
if b then
t =str(d.Month)+"/"+str(d.Day)+"/"+Right(Str(d.Year),2) //
valid entry?
else
t="ERROR"
end if
#endif
me.text=t
end if
On 8/27/06, Terry Ford <[EMAIL PROTECTED]> wrote:
On Aug 27, 2006, at 8:36 PM, Robert Poland wrote:
> Hi,
>
> RB 2006, OS 10.4.7 (Intel)
>
> Am I wrong, the short date in the Mac is 8/27/06 and in the PC is
> 8/27/2006.
>
> Is there a simple cure?
Yup. Don't use a PC. :)
It's basically up to the OS and/or user settings that determines the
results of many of the built-in Date methods. They can be different
depending on the localization of the computer.
Terry
Robert Poland
[EMAIL PROTECTED]
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
