Question

asp [rs.movenext问题]

实现效果如这句只是改动后不知道两个获取语怎么写
如果单句时是这样的，没问题
<%
Set Rs=Conn.Execute("select top 8 * from A where ChID=1 order by Time desc")
Do While Not rs.Eof
%>
<%=Rs("Title")%>
<%
rs.movenext
if rs.eof or rs.bof then exit do
i=i+1
%>
<%=Rs("Title")%>
<%
Rs.MoveNext
Loop
Rs.Close:Set Rs=Nothing
%>

我这样改了后就不知道怎么写
<%
rs.movenext
if rs.eof or rs.bof then exit do
i=i+1
%>
这句了

代码如下：
<%
Set Rs_Class=server.CreateObject("adodb.recordset")
Sql_Class="Select top 1 * from A where St=1 Order by Time desc"
Rs_Class.Open Sql_Class,conn,1,1
Do While Not Rs_Class.Eof

Set Rs_Sc=Server.CreateObject("Adodb.Recordset")
SQL_Sc="select * from B where ID="&Rs_Class("ID")&" order by ID desc"
Rs_Sc.open SQL_Sc,conn,1,1
Do While Not Rs_Sc.Eof
%>
<%=Rs_Class("Title")%>
<%
这里不懂怎么写了
%>
<%=Rs_Class("Title")%>
<%
Rs_Sc.MoveNext
Loop
Rs_Sc.Close
Set Rs_Sc=Nothing

Rs_Class.MoveNext
Loop
Rs_Class.Close
Set Rs_Class=Nothing
%>

Answer 1

Rs_Sc.MoveNext
if Rs_Sc.eof or rs.bof then exit do
i=i+1 '不知道这个是用来干什么的？shuo qing chu