大鱼际萎缩康复手法:求助HTML到ASP代码的改写!!!急!实验内容

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/05 02:01:06
用服务器端脚本语言改写如下代码~~~
恳请大虾指点
<html><head>
<script language="javascript">
var n1='',n2='';
var item1_flag=true;
var opr_type='+';
function Setval(num){
document.Cal.OutText.value+=num;
if(item1_flag)
n1+=num;
else
n2+=num;
}
function SetOpr(opr){
document.Cal.OutText.value+=opr;
item1_flag=false;
opr_type=opr;
}
function Clear(){
document.Cal.OutText.value="";
item1_flag=true;
opr_type='+';
n1="";
n2="";
}
function Compute(obj){
var Result;
if((n1!='')&&(n2!='')){
if((eval(n2)==0)&&(opr_type=='/'))
{
alert('³ýÊý²»ÄÜΪ0!');
Clear();
return;
}
else
{
Result=eval(obj.OutText.value);
document.Cal.OutText.value+='=';
document.Cal.OutText.value+=Result;
}
}
}
</script></head>
<body>
<p align=center>
<form name="Cal">
<input type="text" value="" name="OutText"><br><br>
<input type="button" value="0" onClick="Setval('0')">
<input type="button" value="1" onClick="Setval('1')">
<input type="button" value="2" onClick="Setval('2')">
<input type="button" value="3" onClick="Setval('3')"><br><br>
<input type="button" value="4" onClick="Setval('4')">
<input type="button" value="5" onClick="Setval('5')">
<input type="button" value="6" onClick="Setval('6')">
<input type="button" value="7" onClick="Setval('7')"><br><br>
<input type="button" value="8" onClick="Setval('8')">
<input type="button" value="9" onClick="Setval('9')">
<input type="button" value="+" onClick="SetOpr('+')">
<input type="button" value="-" onClick="SetOpr('-')"><br><br>
<input type="button" value="*" onClick="SetOpr('*')">
<input type="button" value="/" onClick="SetOpr('/')">
<input type="button" value="CE" onClick="Clear()">
<input type="button" value="=" onClick="Compute(this.form)">
</form></p></body></html>