Advertisement
Guest User

Untitled

a guest
Nov 18th, 2017
64
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.87 KB | None | 0 0
  1. Global $date = "[Fri Nov 17 22:56:48 2017]"
  2.  
  3. MsgBox(0, "message", $date & ' -> ' & _Convert($date))
  4.  
  5. Func _Convert($date)
  6. $date = StringReplace($date, 'Jan', '01')
  7. $date = StringReplace($date, 'Feb', '02')
  8. $date = StringReplace($date, 'Mar', '03')
  9. $date = StringReplace($date, 'Apr', '04')
  10. $date = StringReplace($date, 'May', '05')
  11. $date = StringReplace($date, 'Jun', '06')
  12. $date = StringReplace($date, 'Jul', '07')
  13. $date = StringReplace($date, 'Aug', '08')
  14. $date = StringReplace($date, 'Sep', '09')
  15. $date = StringReplace($date, 'Oct', '10')
  16. $date = StringReplace($date, 'Nov', '11')
  17. $date = StringReplace($date, 'Dec', '12')
  18.  
  19. $year = StringMid($date, 21, 4)
  20. $day = stringMid($date, 9, 2)
  21. $month = StringMid($date, 6, 2)
  22. $time = StringMid($date, 12, 8)
  23.  
  24. Return $year & $month & $day & "[" & $time & "]"
  25.  
  26. EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement