Date Format needs adjustment

[unbeliever]

Hello All,

My objective is to select date in the past, format it to dd.mm.yyyy format and input into field which validates only dates in this format. What I was able to produce so far is:

Code:

Dim TestDate
TestDate = DateAdd("d", -65, Date)

This code produces date in yyyy-mm-dd format. I have checked FormatDateTime function and there is no option to format date according to format that I require (dd.mm.yyyy). Since I have found no other VBScript functions which format dates I am asking whether you have encountered such situation and have some working solution?

[unbeliever]

Alert cancelled , solution is as follows:

Code:

Dim TestDate, RUDDate
TestDate = DateAdd("d", -65, Date)

Date1 = Datepart("d",TestDate)
month1 = Datepart("m",TestDate)
year1 = Datepart("yyyy",TestDate)

If len(Date1) = 1 then
Date1 = "0" & Date1
Else
Date1 = Date1
End If

If len(month1) = 1 then
month1 = "0" & month1
Else
month1 = month1
End If

RUDDate = month1 & "." & Date1 & "." & year1

[sreekanth chilam]

Hi ,

Try in the below way

Code:

Dim TestDate
  TestDate = DateAdd("d", -65, Date)
  dpart=datepart("d",TestDate)
  mpart=datepart("m",TestDate)
  ypart=datepart("yyyy",TestDate)
  
  Final_TestDate=dpart&"."&mpart&"."&ypart
  msgbox Final_TestDate