vb6.0对access 2000数据库的数据排序问题？

你的语句没有问题，查一下数据库，是不是“序号”列的值都一样或都没有数据（NULL）。

1楼：

你的程序中如下语句多余：

1、rs2.MoveFirst

2、If Not rs2.EOF Then

因为：

1、rs2.Open时，游标指针就在First

2、如果rs2.EOF，rs2.RecordCount将为0，循环就不会执行（for i=1 to 1）。

删除后重新排序编号？

如果是的话可以删完后重新查询按编号排序

select

编号

from

"

&

table

&

"

order

by

编号"

然后

for

循环遍历数据集

for

i

=1

to

rs.recordcount

rs.fields("编号")=i

rs.update

next

i

select * from table order by 排序字段名 asc----升序

select * from table order by 排序字段名 desc----降序

---