not able to format results in Dateadd

Question

Function CurrMonthName(dateval)
 Dim tmp : tmp = DateAdd("m", 0, dateval) 
CurrMonthName = MonthName(Month(tmp)) 
CurrMonthName = replace(CurrMonthName , "%M",CurrMonthName)

i am trying to format the month name so that it displays first 3 letters. On searching found %M can be used. I tried using it in above code and results are not coming as expected. It is still displaying full month

score 1 · Answer 1 · edited May 23 '17 at 12:29

1

In VBScript, the way to get an abreviated Monthname is MonthName.

>> WScript.Echo MonthName(Month(Date()), True)
>>
Jul
>>

See this answer for a more flexible way to format dates (and other kind of data).

edited May 23 '17 at 12:29

Community

1
1

answered Jul 15 '15 at 20:39

Ekkehard.Horner

38,498
2
45
96

score 0 · Answer 2 · answered Jul 15 '15 at 20:40

0

Use the function "Left" to cut the first off: Left("February",3) gives you "Feb"

answered Jul 15 '15 at 20:40

Shnugo

66,100
9
53
114

Use **std** function MonthName(dtWhatever, True) instead. – Ekkehard.Horner Jul 15 '15 at 20:46

not able to format results in Dateadd

2 Answers2