全文检索，没有可行的答案：使用AdoQuery查询结果中，怎样增加一个字自动编号字段? ( 积分: 50 )

D

del520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #1

使用ACCESS数据库,但询单位的欠款排行,就需要增加一个序号字段!

使用AdoQuery

SELECT 单位, Sum(欠款金额) AS 欠款金额
FROM 帐款
GROUP BY 单位
ORDER BY SUM(欠款金额) DESC;


这样显示的结果有一个单位列,和一个欠款列,

单位 欠款金额
电业局 20000
电信局 18000
移动公司 15000

我现在要在前面加入一个自动的序号以达到如下效果：
排行 单位 欠款金额
1 电业局 20000
2 电信局 18000
3 移动公司 15000

 

D

del520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #2

使用ACCESS数据库,但询单位的欠款排行,就需要增加一个序号字段!

使用AdoQuery

SELECT 单位, Sum(欠款金额) AS 欠款金额
FROM 帐款
GROUP BY 单位
ORDER BY SUM(欠款金额) DESC;


这样显示的结果有一个单位列,和一个欠款列,

单位 欠款金额
电业局 20000
电信局 18000
移动公司 15000

我现在要在前面加入一个自动的序号以达到如下效果：
排行 单位 欠款金额
1 电业局 20000
2 电信局 18000
3 移动公司 15000

 

J

jfyes

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #3

计算字段

 

D

del520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #4

能否详细呢。。。

 

G

goldseal94

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #5

先加一个计算字段，
再在ADOQuery的OnCalcFields事件写如下语句：
iRecNo := DataSet.RecNo;
if iRecNo = -1 then iRecNo := 1;
DataSet.FieldByName('Id').asinteger := iRecNo;

 

L

leadyli

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #6

對ADOQuery進行捆綁，再增加一計算字段.
然后在ADOQuery的OnCalcFields事件中寫:
ADOQuery.FieldByName('id').AsString := ADOQuery.RecordCount;

 

D

del520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #7

接受答案了.

 

漂

漂流的雲

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-06-12

• #8

在表裏加一個字段 排行.然後再每一次添加新數的字段後面加1就行了: