
22/01/2002, 19:23
|
 | | | Fecha de Ingreso: mayo-2001 Ubicación: Madrid
Mensajes: 933
Antigüedad: 24 años Puntos: 0 | |
Re: Convertidor de Divisas function convert()
{
// Declaracion de constantes
var iNUMERO_DECIMALES = 2
// Declaracion de variables
var frmFormulario; // Formulario del html
var iIndex; // Indice de la moneda seleccionada en la combo divisasOrigen
var iSecondIndex; // Indice de la moneda seleccionada en la combo divisasFin
var iTamanio // Tamanio de la salida a mostrar al usuario
var iResult // Resultaedo de salida
// Fija el contenido de las variables
frmFormulario = document.forms["CONVERSOR"];
iIndex = frmFormulario.divisasOrigen.selectedIndex;
iSecondIndex = frmFormulario.divisasFin.selectedIndex;
// Comprueba que los valores insertados sean correctos. En caso contario
// se lo indica al usuario y termina
if ( isNaN(frmFormulario.cantidad.value) ) {
alert("El valor insertado a convertir debe ser numerico")
return;
}
// Obtiene el valor de la conversion
iResult = (frmFormulario.cantidad.value * frmFormulario.divisasFin.options[iSecondIndex].value) / frmFormulario.divisasOrigen.options[iIndex].value;
// Formatea el resultado de salida a dos decimales
iResult += " ";
iTamanio= iResult.length - 1;
iIndex = iResult.indexOf(".");
if (iIndex != -1) {
// Si tiene decimales deja los indicados en la constantes
if ((iTamanio - iIndex) > iNUMERO_DECIMALES)
iResult = xRound(iResult, iNUMERO_DECIMALES);
}
// Fija el resultado de la conversión en el campo resultado
frmFormulario.resultado.value=iResult;
}
---------------> Continúa
<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red"></a> |