求asp数据库统计代码
答案:5 悬赏:80 手机版
解决时间 2021-01-15 04:01
- 提问者网友:暮烟疏雨之际
- 2021-01-14 09:40
求asp数据库统计代码
最佳答案
- 五星知识达人网友:污到你湿
- 2021-01-14 10:48
select cthuanze count (ctneirong) as field1 group by ctneirong追问怎么做?
全部回答
- 1楼网友:风格不统一
- 2021-01-14 12:56
,mgg'ggg
- 2楼网友:鱼忧
- 2021-01-14 12:45
select count(ctneirong) as bbb form cthuanze group by ctneirong
- 3楼网友:杯酒困英雄
- 2021-01-14 12:12
什么数据库?用前置查询或游标写。要是access 就放到中间层写吧。
select distict ctneirong from cthuanze
得到结果集后循环取出rs("ctneirong")
用select count(*) from cthuanze where cthuanze = rs("ctneirong")
思路如此,做法无数
select distict ctneirong from cthuanze
得到结果集后循环取出rs("ctneirong")
用select count(*) from cthuanze where cthuanze = rs("ctneirong")
思路如此,做法无数
- 4楼网友:上分大魔王
- 2021-01-14 11:24
其实这个问题用最笨的遍历法就可以解决(之所以提到这个方法是因为这个方法最容易被新手理解):
SQLString = "Select * From cthuanze order by ctid"
Set MM_Recordset = GetRecordset(SQLString) '打开数据库,GetRecordset是个自定义函数,用于打开指定的SQL查询生成记录集;也可以用别的方法获得记录集;
TempCt = "" '初始化水果名
CtCount = 0 '初始化水果数量
Do While Not MM_Recordset.Eof
IF Trim(MM_Recordset.Fields.Item("Ctneirong").Value) <> TempCt Then '当前记录中水果名与缓存中的水果名不同时,即为不同水果时
Response.Write (Ctcount & "
") '结束前一种水果的统计,输出统计结果
TempCt = Trim(MM_Recordset.Fields.Item("Ctneirong").Value) '将当前水果名写入缓存
Response.write (MM_Recordset.Fields.Item("Ctneirong").Value & ":") '并输出到页面
CtCount = 1 '当前水果统计开始
Else '如果当前记录中水果名与缓存中水果名相同,即为同一种水果时
CtCount = Ctcount + 1 '水果数量累加1
End IF
MM_Recordset.Movenext '遍历数据库
Loop
ReleaseRecordset(MM_Recordset)
SQLString = "Select * From cthuanze order by ctid"
Set MM_Recordset = GetRecordset(SQLString) '打开数据库,GetRecordset是个自定义函数,用于打开指定的SQL查询生成记录集;也可以用别的方法获得记录集;
TempCt = "" '初始化水果名
CtCount = 0 '初始化水果数量
Do While Not MM_Recordset.Eof
IF Trim(MM_Recordset.Fields.Item("Ctneirong").Value) <> TempCt Then '当前记录中水果名与缓存中的水果名不同时,即为不同水果时
Response.Write (Ctcount & "
") '结束前一种水果的统计,输出统计结果
TempCt = Trim(MM_Recordset.Fields.Item("Ctneirong").Value) '将当前水果名写入缓存
Response.write (MM_Recordset.Fields.Item("Ctneirong").Value & ":") '并输出到页面
CtCount = 1 '当前水果统计开始
Else '如果当前记录中水果名与缓存中水果名相同,即为同一种水果时
CtCount = Ctcount + 1 '水果数量累加1
End IF
MM_Recordset.Movenext '遍历数据库
Loop
ReleaseRecordset(MM_Recordset)
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯