程序员

ASP把长的数字用逗号隔开显示的代码

作者:admin 2021-06-29 我要评论

000000000000000000000000000000000000000000000000000000000000000 复制代码 代码如下: % FunctionComma(str) IfNot(IsNumeric(str))orstr=0Then Result=0 Else...

在说正事之前,我要推荐一个福利:你还在原价购买阿里云、腾讯云、华为云服务器吗?那太亏啦!来这里,新购、升级、续费都打折,能够为您省60%的钱呢!2核4G企业级云服务器低至69元/年,点击进去看看吧>>>)
000000000000000000000000000000000000000000000000000000000000000
复制代码 代码如下:

<% 
Function Comma(str) 
If Not(IsNumeric(str)) or str = 0 Then 
Result = 0 
ElseIf Len(Fix(str)) < 4 Then 
Result = str 
Else 
Pos = Instr(1,str,".") 
If Pos > 0 Then 
Dec = Mid(str,Pos) 
End if 
Res = StrReverse(Fix(str)) 
LoopCount = 1 
While LoopCount <= Len(Res) 
TempResult = TempResult + Mid(Res,LoopCount,3) 
LoopCount = LoopCount + 3 
If LoopCount <= Len(Res) Then 
TempResult = TempResult + "," 
End If 
Wend 
Result = StrReverse(TempResult) + Dec  

End If 
Comma = Result 
End Function 
%> 
<html> 
<body> 
<% 
aLongNumber = "12345678" 
%> 
An un-formatted number: <%=aLongNumber%><br> 
The Comma formatted number: <%=Comma(aLongNumber)%> 
</body> 
</html>

原文链接:https://m.jb51.net/article/14859.htm

版权声明:本文转载自网络,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。本站转载出于传播更多优秀技术知识之目的,如有侵权请联系QQ/微信:153890879删除

相关文章
  • ASP把长的数字用逗号隔开显示的代码

    ASP把长的数字用逗号隔开显示的代码

  • 防止网页后退 asp禁止缓存

    防止网页后退 asp禁止缓存

  • ASP的一些自定义函数整理第1/2页

    ASP的一些自定义函数整理第1/2页

  • ASP个人网站与动网整合非官方方法

    ASP个人网站与动网整合非官方方法

腾讯云代理商
精彩导读
海外云服务器
热门资讯
腾讯云代理商