CONVERT DD-MM-YYYY TO MM/DD/YYYY

<%

'SAMPLE INPUT DATE DD-MM-YYYY

'SAMPLE OUTPUT DATE : MM/DD/YYYY

'CONVERT DD-MM-YYYY TO MM/DD/YYYY

function mmddyydash(this_date)

dim dd_this_date,mm_this_date,yy_this_date

if this_date="" then

mmddyy=""

else

date_array=split(this_date,"-")

dd_this_date=trim(date_array(0))

if dd_this_date <10 then

dd_this_date="0" & cint(dd_this_date)

end if

mm_this_date=trim(date_array(1))

if mm_this_date <10 then

mm_this_date="0" & cint(mm_this_date)

end if

yy_this_date=trim(date_array(2))

mmddyydash=mm_this_date & "/" & dd_this_date & "/"
& yy_this_date

end if

end function

%>