Local $sUKDate = @MDAY & '/' & @MON & '/' & @YEAR & ' ' & @HOUR & ':' & @MIN & ':' & @SEC Local $sUSDate = @MON & '/' & @MDAY & '/' & @YEAR & ' ' & @HOUR & ':' & @MIN & ':' & @SEC ConsoleWrite('!Was ' & $sUKDate & ' & now it''s ' & _UKToUSDate($sUKDate) & ' in the US Format.' & @CRLF) ConsoleWrite('!Was ' & $sUSDate & ' & now it''s ' & _USToUKDate($sUSDate) & ' in the UK Format.' & @CRLF) Func _UKToUSDate($sDate) ; DD/MM/YYYY >> MM/DD/YYYY Return StringRegExpReplace($sDate, '^(\d{2})\D?(\d{2})\D?(\d{4})$', '\2/\1/\3') EndFunc ;==>_UKToUSDate Func _USToUKDate($sDate) ; MM/DD/YYYY >> DD/MM/YYYY Return StringRegExpReplace($sDate, '^(\d{2})\D?(\d{2})\D?(\d{4})$', '\2/\1/\3') EndFunc ;==>_USToUKDate
Edited by guinness, 05 April 2013 - 09:56 PM.




