asp计算器
- 当前标签
- 计算
<%
response.Write "<html>"&_
"<head>"&_
"<meta http-equiv=Content-Type content=text/html; charset=gb2312>"&_
"<title>TAIXUN多功能编辑器--计算器</title>"&_
"<link href=Design.css rel=stylesheet TYPE=text/css>"%>
<SCRIPT language=JavaScript>
function computetoedit(obj)
{
return eval(obj.expr.value)
}
function compute(obj)
{obj.expr.value = eval(obj.expr.value)}
var one = '1'
var two = '2'
var three = '3'
var four = '4'
var five = '5'
var six = '6'
var seven = '7'
var eight = '8'
var nine = '9'
var zero = '0'
var plus = '+'
var minus = '-'
var multiply = '*'
var divide = '/'
var decimal = '.'
function enter(obj, string)
{obj.expr.value += string}
</script>
<script event=onclick for=Ok language=JavaScript>
a.value = computetoedit(this.form);
window.returnValue = a.value+"*"+b.value
window.close();
</script>
<script>
function IsDigit()
{
return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
</script><%
response.Write "</head><body topmargin=0>"&_
"<form NAME=calc>"&_
"<TABLE borderColor=#efefef WIDTH=160 ALIGN=center BORDER=1>"&_
"<TBODY>"&_
"<TR>"&_
"<TD bgColor=#000000 colSpan=4>"&_
"<INPUT STYLE='BORDER-RIGHT: #000000 1px inset; BORDER-TOP: #000000 1px inset; FONT-SIZE: 18pt; BORDER-LEFT: #000000 1px inset; COLOR: #ffff00; BORDER-BOTTOM: #000000 1px inset; BACKGROUND-COLOR: #000000;' size=12 NAME=expr id=a action='compute(this.form)' ONKEYPRESS='event.returnValue=IsDigit();'>"&_
"<TR>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, seven)' TYPE=button VALUE=' 7 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, eight)' TYPE=button VALUE=' 8 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, nine)' TYPE=button VALUE=' 9 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, divide)' TYPE=button VALUE=' / '>"&_
"<TR>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, four)' TYPE=button VALUE=' 4 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, five)' TYPE=button VALUE=' 5 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, six)' TYPE=button VALUE=' 6 '> "&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, multiply)' TYPE=button VALUE=' * '>"&_
"<TR>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, one)' TYPE=button VALUE=' 1 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, two)' TYPE=button VALUE=' 2 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, three)' TYPE=button VALUE=' 3 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, minus)' TYPE=button VALUE=' - '>"&_
"<TR>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, decimal)' TYPE=button VALUE=' . '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, zero)' TYPE=button VALUE=' 0 '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT TYPE=reset size=3 VALUE=' AC '>"&_
"<TD WIDTH=40 ALIGN=center>"&_
"<INPUT onclick='enter(this.form, plus)' TYPE=button VALUE=' + '>"&_
"<TR ALIGN=center>"&_
"<TD colSpan=4><INPUT TYPE=button id=b onclick=compute(this.form) VALUE=' = '>"&_
"</TR>"&_
"<TR>"&_
"<TD colSpan=4><INPUT NAME=button TYPE=button onClick='javascript:window.close()' VALUE=' 关闭 '> "&_
"<INPUT NAME=Ok TYPE=button id=Ok VALUE=' 确定 '></TR>"&_
"</TBODY>"&_
"</TABLE>"&_
"</form>"&_
"</body>"&_
"</html>"
%>
- 相关阅读
- ( 2019/12/17 14:22:25 )实现iis6与iis7环境下支持mp4视频随意拖动、预览播放、边下载边播放
- ( 2019/9/18 22:40:15 )纯asp根据当前日期计算出相应的星座
- ( 2019/9/18 22:33:05 )纯asp根据当前日期计算出当前年份的属相
- ( 2019/4/9 13:50:50 )国内网站常用的一些 CDN 静态资源公共库加速服务
- ( 2018/5/28 17:01:29 )asp中求两个数的百分比(利用百分比函数FormatPercent就可以自带%的符号)
- ( 2018/5/14 10:35:46 )ASP版通过身份证信息获取对应的生日性别年龄
- ( 2016/6/16 11:49:35 )access数据库做的网站出现.ldb不能删除超过2KB之后就会网站访问不了数据库,提示数据库不存在
- ( 2016/3/12 14:58:19 )Asp得到当月天数的函数方法
您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。
- 更多>>同类信息
- asp无限级调用分类显示
- 实现iis6与iis7环境下支持mp4视频随意拖动、预览播放、边下载边播放
- 做好的网站把http改成https申请SSL域名证书
- 纯asp根据当前日期计算出当前年份的属相
- ASP利用fso读取文件夹里所有文件的名字
- asp实现获得当前文章的上一篇信息与下一篇信息功能及代码
- asp导出内容到excel表并自定义命名后下载(非打开)
- '禁止站外提交页面和数据
- 更多>>最新添加文章
- 一次自动化批量处理服务器上几万张图片
- uni-app三目运算class和style
- uni-app跨端开发微信小程序时页面栈超过10层时小程序像卡死一样假性不能点击无法跳转的解决方案
- 微信小程序开发中链接navigateTo与redirectTo的对比说明
- 使用uni-app开始小程序使用腾讯视频插件vid播放视频
- 微信小程序-接入广告
- uni-app微信小程序获得用户头像与名称
- 微信公众号生成带参数的二维码asp源码下载
- 更多>>随机抽取信息
- CSS光标属性一览表
- JavaScript max() 方法
- uni-app的父与子页面传递参数之属性Props字段类型讲解
- web2.0中流行的设计元素:颜色
- 超级实用且不花哨的js代码大全( 6 )
- uniapp的rich-text组件注入的a标签点击跳转处理
- 用dl、dt、dd制作个性表格
- Javascript输入汉字自动转换为首字母的拼音码