RosettaCodeData/Task/Date-format/VBScript/date-format.vbs
2026-04-30 12:34:36 -04:00

5 lines
213 B
Text

'YYYY-MM-DD format
WScript.StdOut.WriteLine Year(Date) & "-" & Right("0" & Month(Date),2) & "-" & Right("0" & Day(Date),2)
'Weekday_Name, Month_Name DD, YYYY format
WScript.StdOut.WriteLine FormatDateTime(Now,1)