a guest Jun 24th, 2018 73 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- ' Parse a date in ISO 8601 "universal combined" format: YYYY-MM-DDTHH:MM:SSZ
- ' This function ALSO accepts SQL date format: YYYY-MM-DD HH:MM:SS
- Function CDateFromUniversal( s )
- CDateFromUniversal = CDate(Mid(s, 1, 10) & " " & Mid(s, 12, 8))
- End Function
RAW Paste Data