下面有二个prg
a.prg运行结果是正确的.它更新用的VFP9的语句。
SELECT xh,xm,tot1,mch FROM bmk0651 ORDER BY  tot1  DESC INTO table btmp1   &&按分数降序
SELECT *,RECNO() AS rcn FROM btmp1 INTO TABLE  btmp2  &&根据上面分数降序排列后产生记录号字段
UPDATE btmp1 SET mch=STR(btmp2.rcn,5) FROM btmp2 WHERE btmp2.tot1=btmp1.tot1  &&修改btmp1 中 mc=rcn 条件是用替换库的分数=原库的分数。因替换库(btmp2)中它的记录号在前必来替换前一个记录号。
SELECT * FROM btmp1 ORDER BY mch INTO table mck
select mck
brow
a的结果图：
[attach]75369[/attach]

-------------------------------------------------------------
b.prg前面照抄，更新中用VFP6，加scan--endscan
SELECT xh,xm,tot1,mch FROM bmk0651 ORDER BY  tot1  DESC INTO table btmp1   &&按分数降序
SELECT *,RECNO() AS rcn FROM btmp1 INTO TABLE  btmp2  &&根据上面分数降序排列后产生记录号字段
clear all
use btmp2

scan
 update btmp1 set btmp1.mch=str(btmp2.rcn,5) where btmp1.tot1=btmp2.tot1
endscan
SELECT * FROM btmp1 ORDER BY mch INTO table mck
select mck
brow
b的结果图
[attach]75370[/attach]
从第5名后面应是2个第6名，2个第9名应是第8名，等等。。几个相同成绩的最后一个人记录号来替换，不是几个相同成绩的第一个人记录号来替换，有否办法能用第一个人记录号来替换？
b.prg中更新代码错在哪里？请指教。附原表及有关内容

[ 本帖最后由 sylknb 于 2014-3-30 17:55 编辑 ]

太谢了，我也想到用一个中间库，找出最小的记号，但代码一直写不对，原来把总分相同的找出最小记录号。太妙了。

太好了。很快。