date format in VBS

Question

I want to get a date in full format in my vbscript. For example, I put
DateParam = FormatDateTime(Date()-1, 2)

But it returns

3/8/201

Answer 1

ThisDate = Date()

MyDate = Right("0" & CStr(Month(ThisDate)), 2) & "/" & _
         Right("0" & CStr(Day(ThisDate)), 2) & "/" & CStr(Year(ThisDate))