VBScript How can I Format Date

Question

I want the date to look like MM-DD-YYYY instead of MM DD YYYY

User · Answer

For anyone who might still need this in the future. My answer is very similar to qaweb, just a lot less intimidating. There seems to be no cool automatic simple function to formate date in VBS. So you'll have to do it manually. I took the different components of the date and concatenated them together.

Dim timeStamp
timeStamp = Month(Date)&"-"&Day(Date)&"-"&Year(Date)
run = msgbox(timeStamp)

Which will result in 11-22-2019 (depending on the current date)

User · Answer

Suggest calling  Now  only once in the function to guard against the minute  or even the day  changing during the execution of the function   Thus   Function timeStamp       Dim t      t   Now     timeStamp   Year t   amp   -   amp        Right  0   amp  Month t  2    amp   -   amp        Right  0   amp  Day t  2    amp       amp          Right  0   amp  Hour t  2   amp        Right  0   amp  Minute t  2         amp       Right  0   amp  Second t  2   End Function

User · Answer

The output of FormatDateTime depends on configuration in Regional Settings in Control Panel  So in other countries FormatDateTime d  2  may for example return yyyy-MM-dd   If you want your output to be  culture invariant   use myDateFormat   from stian net s solution  If you just don t like slashes in dates and you don t care about date format in other countries  you can just use  Replace FormatDateTime d 2       -

User · Answer

0   vbGeneralDate - Default  Returns date  mm dd yy and time if specified  hh mm ss PM AM  1   vbLongDate - Returns date  weekday  monthname  year 2   vbShortDate - Returns date  mm dd yy 3   vbLongTime - Returns time  hh mm ss PM AM 4   vbShortTime - Return time  hh mm   d CDate  2010-02-16 13 45   document write FormatDateTime d   amp    lt br   gt    document write FormatDateTime d 1   amp    lt br   gt    document write FormatDateTime d 2   amp    lt br   gt    document write FormatDateTime d 3   amp    lt br   gt    document write FormatDateTime d 4   amp    lt br   gt      If you want to use another format you will have to create your own function and parse Month  Year  Day  etc and put them together in your preferred format   Function myDateFormat myDate      d   TwoDigits Day myDate       m   TwoDigits Month myDate           y   Year myDate      myDateFormat  m  amp   -   amp  d  amp   -   amp  y End Function  Function TwoDigits num      If Len num  1  Then         TwoDigits  0  amp num     Else         TwoDigits num     End If End Function   edit  added function to format day and month as 0n if value is less than 10

User · Answer

Although answer is provided I found simpler solution   Date   01 20 2017   By doing replace  CurrentDate   replace date        -     It will output   01-20-2017

User · Answer

for unique file names I use  Dim ts  logfile  thisScript  thisScript   LEFT Wscript ScriptName LEN Wscript ScriptName -4    assuming  vbs extension  ts   timeStamp logfile   thisScript  amp       amp  ts           Function timeStamp        timeStamp   Year Now   amp   -   amp        Right  0   amp  Month Now  2    amp   -   amp        Right  0   amp  Day Now  2    amp       amp          Right  0   amp  Hour Now  2   amp        Right  0   amp  Minute Now  2         amp       Right  0   amp  Second Now  2   End Function

User · Answer

This snippet also solve this question with datePart function  I ve also used the right   trick to perform a rpad x 2  0     option explicit  Wscript Echo  Today is    amp  myDate now     date formatted as your request Function myDate dt      dim d m y  sep     sep    -        right     here works as rpad x 2  0       d   right  0   amp  datePart  d  dt  2      m   right  0   amp  datePart  m  dt  2      y   datePart  yyyy  dt      myDate  m  amp  sep  amp  d  amp  sep  amp  y End Function

[date] VBScript How can I Format Date?

Examples related to date

Examples related to vbscript