How to convert mmddyyyy into ddmmyyyy in classic asp

How to Convert mm/dd/yyyy format into dd/mm/yyyy format in classic asp



<%

function ddmmyy(this_date)

dim dd_this_date,mm_this_date,yy_this_date

if this_date="" then

ddmmyy=""

elseif not isDate(this_date) then

ddmmyy=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

yy_this_date=right(year(this_date),2)

ddmmyy=dd_this_date & "-" & mm_this_date & "-"
& yy_this_date

end if

end function

%>