Mostrando Codigo - Asp
EXPLICACION
Este codigo `puede aplicarse a cualquier tipo de moneda
<%
Function Pts_euro(ByVal pts)
Const Euro = 166.386 ' Indicamos el valor del euro con respecto a la peseta
Dim e
e = FormatCurrency((pts/Euro), 2)' formato en que aparecerá, 2 decimales
Pts_euro = e
End Function
%>
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
COMENTARIOS
Aun no existe ningun comentario para este Codigo.