我想将数据库中的数据总数显示出来成为 如 0,123,456,789

一般的显示就成了 如 0123456789

通过代码实现显示 如 0,123,456,789 这样的效果怎么实现呢？

在VB中可以用Format函数，Str=Format(Str, "##,##0")

ASP中没有这个函数，可以使用FormatNumber函数，Response.Write FormatNumber(123456789,0)

FormatNumber 函数 语言参考

--------------------------------------------------------------------------------

描述 返回表达式，此表达式已被格式化为数值。 语法 FormatNumber(expression [,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]]) FormatNumber 函数的语法有以下参数：

参数 描述 expression 必选。要被格式化的表达式。 NumDigitsAfterDecimal 可选。指示小数点右侧显示位数的数值。默认值为 -1，指示使用的是计算机的区域设置。 IncludeLeadingDigit 可选。三态常数，指示是否显示小数值小数点前面的零。有关数值，请参阅“设置”部分。 UseParensForNegativeNumbers 可选。三态常数，指示是否将负值置于括号中。有关数值，请参阅“设置”部分。 GroupDigits 可选。三态常数，指示是否使用计算机区域设置中指定的数字分组符号将数字分组。有关数值，请参阅“设置”部分。

设置 IncludeLeadingDigit、UseParensForNegativeNumbers 和 GroupDigits 参数可以有以下值： 常数 值 描述 TristateTrue -1 True TristateFalse 0 False TristateUseDefault -2 使用计算机区域设置中的设置。

说明 当省略一个或多个可选参数时，由计算机区域设置提供被省略参数的值。 -------------------------------------------------------------------------------- 注意 所有设置信息均取自区域设置的“数字”附签。

--------------------------------------------------------------------------------

下面例子利用 FormatNumber 函数把数值格式化为带四位小数点的数:

Function FormatNumberDemo Dim MyAngle, MySecant, MyNumber MyAngle = 1.3 ' 用弧度定义角。 MySecant = 1 / Cos(MyAngle) ' 计算正割值。 FormatNumberDemo = FormatNumber(MySecant,4) ' 把 MySecant 格式化为带四位小数点的数。 End Function

[此贴子已经被作者于2004-08-02 21:52:49编辑过]

我现在显示数字的代码是 <%=rs.recordcount%> 怎么样把这个变成你说得那样子的呢？

饭不会做，我已经帮你做好了

没想到饭都不会吃，还要喂

<%=FormatNumber(rs.recordcount, 0)%>

[此贴子已经被作者于2004-08-03 14:37:15编辑过]

[此贴子已经被作者于2004-08-03 14:01:37编辑过]

<% Option Explicit

Dim CnStr,Rs CnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+Server.MapPath("data.mdb") Set Rs=Server.CreateObject("ADODB.RecordSet") Rs.Open "select * from users",CnStr,1,1 If Not Rs.Eof Then %> <%=FormatNumber(Rs.RecordCount,0)%> <% End If Rs.Close Set Rs=Nothing %>