asp中rs.BookMark的使用介绍

<%
dim d
sql="select * from cs1"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
while not rs.eof
  if cint(rs("id"))=10 then
    d=rs.bookmark
  end if
  response.write(rs("id")&"-"&rs.bookmark&"<br>")
  rs.movenext
wend
rs.bookmark=d
response.write(rs("id")&"-<br>")
while not rs.eof
  if cint(rs("id"))=10 then
    d=rs.bookmark
  end if
  response.write(rs("id")&"-"&rs.bookmark&"<br>")
  rs.movenext
wend
%>