How about this:

function IsDate pDate, pSysDate

if pSysDate then

put char 3 of the short system dateformat into tDelimiter

else

put char 3 of the short dateformat into tDelimiter

end if

if tDelimiter is in pDate and pDate is a date then return true

return false

end IsDate

trevix
_______________________________________________
use-livecode mailing list
use-livecode@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode

Reply via email to