用ASP写组件
更新时间：2006年08月25日 00:00:00 作者：
打开VB,新建AX DLL,工程名为Str,类名count,输入如下代码:
Public Function add(ByVal a As Double, ByVal b As Double, ByVal c As Integer, ByVal d As Integer) As Double
d = CInt(d)
If c = 1 Then '加
add = FormatNumber(a + b, d)
ElseIf c = 2 Then '减
add = FormatNumber(a - b, d)
ElseIf c = 3 Then '乘
add = FormatNumber(a * b, d)
ElseIf c = 4 Then '除
add = FormatNumber(a / b, d)
End If
End Function
参数说明:a,b 为需要计算的数值,c为计算类型,d为小数点保留多少位
客户端ASP文件代码:
set obj=server.CreateObject("str.count")
dim c
c=obj.Add(455,45,4,2)
Response.Write c
上面代码执行结果就是:455除以45,小数点精确到百分位
复制代码 代码如下:
Public Function add(ByVal a As Double, ByVal b As Double, ByVal c As Integer, ByVal d As Integer) As Double
d = CInt(d)
If c = 1 Then '加
add = FormatNumber(a + b, d)
ElseIf c = 2 Then '减
add = FormatNumber(a - b, d)
ElseIf c = 3 Then '乘
add = FormatNumber(a * b, d)
ElseIf c = 4 Then '除
add = FormatNumber(a / b, d)
End If
End Function
参数说明:a,b 为需要计算的数值,c为计算类型,d为小数点保留多少位
客户端ASP文件代码:
复制代码 代码如下:
set obj=server.CreateObject("str.count")
dim c
c=obj.Add(455,45,4,2)
Response.Write c
上面代码执行结果就是:455除以45,小数点精确到百分位
相关文章
在论坛看到很多帖子代码中都有一个共同的基本错误，字段类型错误。程序和数据库是紧紧相连的，数据库字段文本型或时间型的都使用单引号2008-07-07
用asp实现访问远程计算机上MDB access数据库文件的方法
用asp实现访问远程计算机上MDB access数据库文件的方法...2007-11-11
其实我上一篇写的js判断中文才是最好的方法，这个是asp的一种，只要是双字节都是当作中文判断2008-09-09
一直以来对asp的程序编写都比较随意，也没有太多考虑运行效率的问题。asp对语法是相当宽容的，容错性很高，它不需要定义变量便可直接使用，变量名不需要区分大小写字母，asp的文件名也同样不像jsp那样对字母大小写是敏感的2012-07-07
很简单的函数，用来检测网站域名是否能正常访问。2008-07-07
笔者对asp编程不是很熟悉，而且好长不用记不清了。这一次，需要保存asp的二维数组为asp文件，使用include 指令文件引用后，直接调用。使用过程中发现asp的二维数组相关资料很少，而且介绍简单模糊，现结合使用实例做个简单笔记。2023-06-06![在Z-BLOG可用的新版ASP的GIF验证码[V70404]](//img.jbzj.com/images/xgimg/bcimg6.png)
在Z-BLOG可用的新版ASP的GIF验证码[V70404]
在Z-BLOG可用的新版ASP的GIF验证码[V70404]...2007-04-04
Asp 使用 Microsoft.XMLHTTP 抓取网页内容并过滤需要的
这篇文章主要介绍了Asp 使用 Microsoft.XMLHTTP 抓取网页内容(没用乱码)，并过滤需要的内容2014-05-05
调用数据时把数据库的换行标记替换为<br>前台调用时候设置为支持HTML就可以了，通过textarea提交数据的朋友可以参考下。2011-05-05
实现纯真IP txt转mdb数据库的方法...2007-07-07
![在Z-BLOG可用的新版ASP的GIF验证码[V70404]](http://img.jbzj.com/images/xgimg/bcimg6.png)
最新评论