PureBasic
;
; ------------------------------------------------------------
;
;   PureBasic - Date example file
;
;    (c) Fantaisie Software
;
; ------------------------------------------------------------
;

Date$ = FormatDate("%yyyy/%mm/%dd", Date())
Time$ = FormatDate("%hh:%ii:%ss", Date())

MessageRequester("PureBasic - Пример Date", "Дата: "+Date$+Chr(10)+"Время: "+Time$, 0)