改進(jìn)一下asp自帶的formatNumber函數(shù)
更新時(shí)間：2006年08月05日 00:00:00 作者：
asp的formatNumber再處理類似 25/5的值時(shí),結(jié)果是 5.00 處理類似 28/8的值時(shí),結(jié)果是3.50
改進(jìn)一下,去掉沒(méi)用的0 讓結(jié)果分別是 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
改進(jìn)一下,去掉沒(méi)用的0 讓結(jié)果分別是 5和3.5
復(fù)制代碼 代碼如下:
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
相關(guān)文章
很多黑客通過(guò)修改后臺(tái)登陸代碼獲得目標(biāo)網(wǎng)站的用戶登錄密碼，這樣我們一旦輸入了密碼就保存到一個(gè)txt里面2012-05-05
在ASP中用組件檢測(cè)當(dāng)前網(wǎng)卡地址的代碼
在ASP中用組件檢測(cè)當(dāng)前網(wǎng)卡地址的代碼...2007-03-03
用asp實(shí)現(xiàn)把文件打包成Xml文件包，帶解包的ASP工具附下載
用asp實(shí)現(xiàn)把文件打包成Xml文件包，帶解包的ASP工具附下載...2007-06-06
asp正則替換鏈接實(shí)現(xiàn)偽靜態(tài)效果
有時(shí)候我們需要將頁(yè)面中的動(dòng)態(tài)頁(yè)面替換為我們偽靜態(tài)的格式，一般是頁(yè)面內(nèi)容中批量替換2013-08-08
這篇文章主要介紹了XML+XSL+CSS+ASP打造留言簿,需要的朋友可以參考下2006-07-07
SQL"不能為新插入的行確定標(biāo)識(shí)"錯(cuò)誤的解決方法
下列代碼運(yùn)行將出錯(cuò)(不能為新插入的行確定標(biāo)識(shí)),即新記錄不能為自己的另一個(gè)字段賦予新生成標(biāo)識(shí)的值2008-10-10
asp調(diào)用Word打印的代碼...2007-04-04
對(duì)于asp下的不用fso，使用adodb.stream對(duì)象實(shí)現(xiàn)文件的保存與讀取，避免一些虛擬主機(jī)不支持fso的機(jī)器。2009-01-01
研究動(dòng)網(wǎng)得到的一些動(dòng)網(wǎng)參數(shù)
研究動(dòng)網(wǎng)得到的一些動(dòng)網(wǎng)參數(shù)...2006-11-11
asp WAP獲取手機(jī)終端信息的一段代碼...2007-11-11