Code: Select all
<script language="JavaScript">
<!--
function IsFloat(strString, err_msg, text_name, calc_type)
{
var strValidChars = "0123456789.";
var strChar;
var blnResult = true;
var Decimal_Count = new Number(0);
for (i = 0; i < strString.length && blnResult == true; i++)
{
strChar = strString.charAt(i);
if (strChar == ".")
{
Decimal_Count = Decimal_Count + 1;
}
if ((strValidChars.indexOf(strChar) == -1) || (Decimal_Count > 1))
{
var err_msg_alert = 'Voer een geldig decimaal nummer in......'
' textbox';
eval('window.document.Calculation_Form.' + text_name + '.select()');
alert(err_msg_alert);
blnResult = false;
this.select;
return blnResult;
}
}
return blnResult;
}
function RectCalc()
{
var blnNoNull = true;
if (window.document.Calculation_Form.R_Length.value == "")
{
window.document.Calculation_Form.R_Length.select();
alert("Bedankt..................");
blnNoNull = false;
}
else
{
if (window.document.Calculation_Form.R_Width.value == "")
{
window.document.Calculation_Form.R_Width.select();
alert("Bedankt.................");
blnNoNull = false;
}
}
if (blnNoNull)
{
var R_Length = new Number(window.document.Calculation_Form.R_Length.value);
var R_Width = new Number(window.document.Calculation_Form.R_Width.value);
var Calc_Rect = new Number(0);
Calc_Rect = (R_Length+R_Width)*2;
Calc_Rect = Calc_Rect*100;
Calc_Rect = Math.ceil(Calc_Rect);
Calc_Rect = Calc_Rect/100;
window.document.Calculation_Form.Calc_Rect.value = Calc_Rect;
}
}
//-->
</script>
<form name="Calculation_Form">
<table align="center">
<tbody><tr><td>Lengte (in eenheden : cm, m…) :</td>
<td><input name="R_Length" onchange="return IsFloat(this.value, 'longueur du rectangle', 'R_Length', 'RectCalc()')" size="10"></td>
</tr>
<tr><td>Breedte (in eenheden : cm, m…) :</td>
<td><input name="R_Width" onchange="return IsFloat(this.value, 'largeur du rectangle', 'R_Width', 'RectCalc()')" size="10"></td>
</tr>
<tr><td></td>
<td><center><input onclick="RectCalc()" value=" = " type="button"></center></td>
</tr>
<tr><td>Omtrek van de rechthoek (in eenheden : cm, m…) :</td>
<td><input name="Calc_Rect" size="10"></td>
</tr>
</tbody></table>
</form>