设置文本框只能输入数字.doc

设置文本框只能输入数字functioncalc()varre=/d+$/;/只能输入数字的的RegularExpressionintTotal=0;intTextBox1=0;intTextBox2=0;intTextBox3=0;if(document.all.TextBox1.value!=)obj=document.all.TextBox1;if(obj.value!=&!re.test(obj.value)document.all.Label1.innerText=只能输入数字;document.all.TextBox1.select();/若頁面中，有写入资料库功能的确定按钮，可在这将其设为唯读/document.all.FormView1_btnInsertConfirm.disabled=true;returnfalse;elsedocument.all.Label1.innerText=;/若使用者改為只輸入數字，則清除Label1中的錯誤訊息/若頁面中，有写入资料库功能的确定按钮，可在这将其设为唯读/document.all.FormView1_btnInsertConfirm.disabled=false;intTextBox1=eval(document.all.TextBox1.value);elsedocument.all.Label1.innerText=;/若使用者把TextBox1清空，則清除Label1中的錯誤訊息if(document.all.TextBox2.value!=)obj=document.all.TextBox2;if(obj.value!=&!re.test(obj.value)document.all.Label2.innerText=只能输入数字;document.all.TextBox2.select();/若頁面中，有写入资料库功能的确定按钮，可在这将其设为唯读/document.all.FormView1_btnInsertConfirm.disabled=true;returnfalse;elsedocument.all.Label2.innerText=;/若使用者改為只輸入數字，則清除Label2中的錯誤訊息/若頁面中，有写入资料库功能的确定按钮，可在这将其设为唯读/document.all.FormView1_btnInsertConfirm.disabled=false;intTextBox2=eval(document.all.TextBox2.value);elsedocument.all.Label2.innerText=;/若使用者把TextBox2清空，則清除Label2中的錯誤訊息if(document.all.TextBox3.value!=)obj=document.all.TextBox3;if(obj.value!=&!re.test(obj.value)document.all.Label3.innerText=只能输入数字;document.all.TextBox3.select();/若頁面中，有写入资料库功能的确定按钮，可在这将其设为唯读/document.all.FormView1_btnInsertConfirm.disabled=true;returnfalse;elsedocument.all.Label3.innerText=;/若使用者改為只輸入數字，則清除Label3中的錯誤訊息/若頁面中，有写入资料库功能的确定按钮，可在这将其设为唯读/document.all.FormView1_btnInsertConfirm.disabled=false;intTextBox3=eval(document.all.TextBox3.value);elsedocument.all.Label3.innerText=;/若使用者把TextBox3清空，則清除Label3中的錯誤訊息intTotal=intTextBox1+int