请教一个循环读取的问题!

Question

我从一个表里读出来一些数据进行操作!
我把操作过的记录都作上了标记!
在操作过程中可能这个表的数据有增加!
'//
我想实现的目标就是一直记他读下去直到所有的记录都有操作过的标记!
怎么样实现?

Answer 1

用Timer事件循环读没有打标记数据,取出后一一打上标记

Answer 2

在数据库里面添加一行，readed
每次读出然后紧接着update readed字段
不知道这样符合你的要求不？

Answer 3

我是这样做的!
       Dim rs As New ADODB.Recordset
       rs.Open "select * from tmpurl where ucheck=0", conn, 3, 3
      Do While Not rs.EOF
          url = rs("url")
          urltext = rs("urltext")
          comeFromUrl = rs("comeFromUrl")
          comeFromText = rs("comeFromText")
                   '/此处略代码1  
                   '/此处略代码2
                If Not rs.EOF Then
10:             rs("ucheck") = 1
                rs.Update
                rs.MoveNext
                End If
       Loop
'//rs("ucheck") = 1 就表示当前记录已经被处理!
其中代码1的会对当前记录作一些处理 代码2处理这个会对 tmpurl这表的记录有所增加!
这样的执行结果是rs.eof=true 了!但是事实上tmpurl表里是有记录的!(可能是新增加的)
怎么样才能把这些记录一直执行下去!直到再也没有还没处理的记录