我想做一个流水号码，要在记录中检测流水号最后三位最大的值？？帮忙看一下错哪里？？

     我想做一个流水号编码原则是：“JC”+时间+3位尾数
    想法是让一个新增的流水号，在整个表中循环，如果有的话，就让尾数加1。
代码如下：
             sql="select * from 结存 where 进仓单号='"&riqi&"'"  
             set rs=conn.execute(sql)
              rs.movefirst         '让指针指向第一条记录     
               '将第一条记录的进仓单号字段先赋给riqi，作为比较的初始值
             DO WHILE  NOT rs.EOF
                  if rs("进仓单号") =riqi then     '如果这个新进仓单号如果存在的话
                   yy=right(rs("进仓单号"),3)+1    '
                   ll=left(rs("进仓单号"),10)
                   riqi=ll&Right("00"&yy,3)      '这里就是让后面的数字用0来补足三位，
                                                 就让其尾数继续增加，再让其循环继续比较
                   end if
              loop
                 rs.movelast                 
但是这段代码运行起来，服务器会提示超时，是不是有死循环？？
   我理解不通，应该没有的呀？但为什么超时，我的记录数只有250条左右。