Question

VB数据库多条件求和的代码

有一个ACCESS的数据库，表格是这样的
品名，数量，不良数，进货日期
现在我在VB里做了一个LISTVIEW，希望有以下效果
在某个时间段里，数量最多的8个品名和他们的总数量显示在LISTVIEW，
在某个时间段里，不良数最多的8个品名以及不良数的和显示在LISTVIEW里

以上求代码

Answer 1

select top 8 TH004,sum(TH007) a from PURTH
where CREATE_DATE>='20070101'
group by TH004
order by a desc

追问

TH004,sum(TH007)
这段是什么意思啊？不是很理解

追答

数量最多的8个品名和他们的总数量
select top 8 品名,sum(数量) a from 表格
where 进货日期>='' and 进货日期<=''
group by 品名
order by a desc

追问

db.RunSQL "select top 2 cdno,sum(buliangshu）from jianpinbaogao group by cdno order by sum(buliangshu) desc"
i = 1
Do Until db.RS.EOF
Set itmX = ListView1.ListItems.Add(i, "cdno", db.RS.Fields("cdno"))
itmX.SubItems(ListView1.ColumnHeaders("buliangshu").SubItemIndex) = db.RS.Fields("expr1001")
i = i + 1
db.RS.MoveNext
Loop
显示第一条数据的时候是可以的，到第二条数据就会报错关键字不唯一