改进一下asp自带的formatNumber函数

asp的formatNumber再处理类似 25/5的值时,结果是 5.00  处理类似 28/8的值时,结果是3.50 

改进一下,去掉没用的0  让结果分别是 5和3.5

复制代码 代码如下:

Function fm(nb)

If IsNumeric(nb) Then

Dim a

a=FormatNumber(nb,2,-1)

If Right((a+""),2)=00 Then

fm=CLng(a)

Else

fm=FormatNumber(nb,1,-1)

End if

Else

fm=0

End if

End Function

时间： 2024-09-18 11:54:59

改进一下asp自带的formatNumber函数的相关文章

改进一下asp自带的formatNumber函数_应用技巧

asp的formatNumber再处理类似 25/5的值时,结果是 5.00  处理类似 28/8的值时,结果是3.50  改进一下,去掉没用的0  让结果分别是 5和3.5 复制代码 代码如下: Function fm(nb) If IsNumeric(nb) Then Dim a a=FormatNumber(nb,2,-1) If Right((a+""),2)=00 Then fm=CLng(a) Else fm=FormatNumber(nb,1,-1) End if Els

ASP验证带小数点数字格式的函数

ASP验证带小数点数字格式的函数,数字范围是922337203685477 ~ -922337203685477 ,非常实用. ASP验证带小数点数字格式的函数,数字范围是922337203685477 ~  -922337203685477 ,非常实用.  Public Function CheckNumeric(ByVal CHECK_ID)   If CHECK_ID <> "" And IsNumeric(CHECK_ID) Then    If CHECK_ID

ASP 四舍五入FormatNumber函数用法

  ASP里面的Round函数都说是专一四舍五入的函数,不过FormatNumber函数也可以实现几乎等同于四舍五入的功能,经测试,FormatNumber还要比Round更准确.FormatNumber函数主要是用于对数字.货币.百分比数据作格式化处理,比如可以把35569.5867变换成35569.59,所以用它来四舍五入相当不错.下面来说如何使用FormatNumber函数. FormatNumber(Expression [, Digit [, LeadingDigit [, Paren

ASP调用带参数存储过程的几种方式_存储过程

ASP调用带参数存储过程的几种方式     选择自 hxfwsk 的 Blog   关键字   存储过程  出处      作者: 讨饭猫 ASP调用带参数存储过程的几种方式 最近有很多的朋友问到调用存储过程的问题,这里简单介绍几种ASP调用带参数存储过程的方法. 1 这也是最简单的方法,两个输入参数,无返回值: set connection = server.createobject("adodb.connection") connection.open someDSN  Conne

js 传递函数: JS中setInterval、setTimeout不能传递带参数的函数的解决办法

在JS中无论是setTimeout还是setInterval,在使用函数名作为调用句柄时都不能带参数,而在许多场合必须要带参数,这就需要想方法解决.一.采用字符串形式:--(缺陷)参数不能被周期性改变setInterval("foo(id)",1000);二.匿名函数包装 (推荐)window.setInterval(function()    {foo (id);    }, 1000);   这样就可以周期性执行foo(id)这个函数,而且把变量id传递进去:三.定义返回无参函数的

ASP实现带进度条测试网速的代码程序

ASP实现带进度条的测试网速. 把下列代码存为xxx.ASP的文件,放在你的服务器上就可以直接运行了. <% Response.Expires = 0 Response.Expiresabsolute = Now() - 1 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheC

ASP调用带参数的MSSQL存储过程，并返回临时表记录集

前些天,阿里西西web团队(Alixixi.com)在开发一个系统平台时,需要通过存储过程调用多个表的几个字段,合并到一个临时表中,并进行排序返回给ASP调用. 下面,我把经验分享出来: 1.存储过程部分: 以下是存储过程部分:CREATE PROCEDURE [dbo].[alixixi] @sNum int, @sOrder varchar(20)  AS SET nocount on create table #btable (id int,channelid int,classid in

asp之日期和时间函数示例

函数|示例 asp之日期和时间函数示例 可以使用日期和时间函数来得到各种格式的日期和时间 函数 语法 说明 示例 Now Now() 取得系统当前的日期和时间 Dim MyVar MyVar = Now' MyVar 包含当前的日期和时间. Date Date() 取得系统当前的日期 Dim MyDate MyDate = Date' MyDate 包含当前系统日期. Time Time() 取得系统当前的时间 Dim MyTime MyTime = Time ' 返回当前系统时间. Year

Asp 利用 Jmail 发信的函数

jmail|函数 Asp 利用 Jmail 发信的函数 '作者:Loster(OICQ:181306) [如果转载请勿删除此信息,谢谢!]'函数名:Send_Email()'作用:利用Jmail4.3组件发送E-Mail'参数:'Email:类型:字符串.作用:接收E-Mail的地址.'E_Subject:类型:字符串.作用:信件主题.'Information:类型:字符串.作用:信件内容.'S_Type:类型:布尔值.作用:是否为Html格式信件.True为Html格式.False为文本格式.