<%
'SAMPLE INPUT: 12/31/2009
'SAMPLE OUTPUT 31/12/2009
'Convert mm/dd/yyyy to dd/mm/yyyy format in classic asp
function ddmmyyyyslash(this_date)
dim dd_this_date,mm_this_date,yyyy_this_date
if this_date="" then
ddmmyyyyslash=""
elseif not isDate(this_date) then
ddmmyyyyslash=this_date
else
dd_this_date=day(this_date)
if dd_this_date <10 then
dd_this_date="0" & dd_this_date
end if
mm_this_date=month(this_date)
if mm_this_date <10 then
mm_this_date="0" & mm_this_date
end if
yyyy_this_date=year(this_date)
ddmmyyyyslash=dd_this_date & "/" & mm_this_date & "/"
& yyyy_this_date
end if
end function
%>