LS的如果记录很多的话，马上就会把服务器拖跨

LS说的是！但是他如果只有30条记录是不是可以考虑呢！那还有什么好的办法呢！

试试！不过是在数据很少的情况下啊！

[此贴子已经被作者于2007-4-10 9:13:02编辑过]

可以用rs.move(行号）来实现把
rs.Move 10
Dim RowNum
RowNum=10
Dim RowCount
RowCount=rs.recordcount
Do Until rs.EOF
……
RowNum+=1
IF RowCount-RowNum=5 Then
Exit Do
End IF
rs.MoveNext
Loop
这样循环呢。

谢谢各位关注和帮忙
小弟先去试一下

可能是我没说清楚,我是说这样的,假如有这样的记录:
id name num
1 test1 7
2 test2 9
3 test3 8
4 test4 5
5 test5 9
6 test6 7
7 test7 3
8 test8 9
9 test9 8
10 test10 6
根据num排序后,我要取出中间的7条记录,就是去掉num中最大数的前两条和最小的一条.
我想做的就是一个评分程序,就是在任意的给出的分数中去掉一定数最高分和最低分,求中间一段分数的平均分

谢谢各位特别要谢谢yms123
问题已解决了