hi
Use the below code
StrDateFormat = FormatDateTime(StrDate, 1)
StrDateFormat1 = Split (Trim(StrDateFormat),",",-1,1)
StrDt = Right(Trim(StrDateFormat1(1)),2)
StrMonth = Ucase (Left(Trim(StrDateFormat1(1)),3))
fDateformat = StrDt&"-"&StrMonth&"-"&Trim(StrDateFormat1(2))
--
Mallipeddi Sreedhar
91-9848871279