<%= Fecha = Month(Actual) & "/" & Day(Actual) & "/" & Year(Actual) %>
Function Fecha(expr) Fecha = Month(expr) & "/" & Day(expr) & "/" & Year(expr) End Function <%=Fecha(Actual)%>