求asp制作计算器代码

来源:百度知道 编辑:UC知道 时间:2024/06/22 15:19:19
那位大哥给个asp制作的计算器代码啊?我拿来研究研究 谢了先
我说的是用asp制作的啊 不过还是谢谢你了
再补充一下我是那来研究一下的 看看它的模式

<html>
<body>
<script language="vbscript">
on error resume next
dim expression
sub addv(cv)
cv=trim(cv)
if( (cv="+") or (cv="-") or (cv="*") or (cv="\")) then
document.f1.resu.value=""
if (right(expression,1)="" or right(expression,1)="+" or right(expression,1)="-" or right(expression,1)="*" or right(expression,1)="\" )then
msgbox("这样无法计算")
expression=""
exit sub
end if
end if
expression=expression&cv
document.f1.resu.value=expression
end sub
sub compute()
document.f1.resu.value=eval(expression)
expression=document.f1.resu.value
end sub
sub crt()
expression=""
document.f1.resu.value=""
end sub
</script>
<form name="f1">
<