当前位置:编程学习 > VB >>

VB连接ACCESS数据库,SQL查询语句请教

VB连接ACCESS数据库,SQL语句查询。
有一个表格A,记录每次投标报价的情况,字段如下:
投标项目、投标单位、投标价格

现在想做一个报表功能,选择一个投标单位,然后生成该单位的投标报价统计情况(主要是统计该单位每

次投标报价的排名),报表中显示如下字段:
投标项目、投标价格、价格排名

如果单独筛选该投标单位的投标项目、投标价格,通过一个where判断就容易实现,但现在加了一个价格

排名,如何实现比较好?谢谢! select item, company from table order by price, 然后用grid控件显示, grid的行号就是排名
谢谢楼上的,可能之前的描述不太准确。假设选择单位:***有限公司,生成如下报表:
投标项目  投标价格  投标排名
 项目**    8888       2
 项目***   7777       5
 项目###   322        1

项目名称和投标价格都是现成的,通过where就能筛选出来,关键是后面新增的这个"投标排名"如何生成? 要人工写代码生成。

首先 SELECT * FROM A ORDER BY 投标价格 DESC '如果假低在在前 ASC 或省略

然后
rs.MoveLast
rs.MoveFirst
For i = 1 To rs.RecordCount
    rs!投标排名 = i
    rs.Update
    rs.MoveNext
Next i 忘记了,要分投标项目统计:
可选用一个 rsTmp 存放项目:
Set rsTmp = cn.Executte "SELECT DISTINCT 投标项目 From A"
Do Until rsTmp.EOF 
    Open "SELECT * FROM A WHERE 投标项目='" & rsTmp!投标项目 & " ORDER BY 投标价格 DESC", cn
    rs.MoveLast
    rs.MoveFirst
    For i = 1 To rs.RecordCount
        rs!投标排名 = i
        rs.Update
        rs.MoveNext
    Next i
Loop 
补充:VB ,  数据库(包含打印,安装,报表)
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,