<%set rs=server.CreateObject("Adodb.recordset")
rs.open "select * from zs_news where m_classid="&classid&" order by m_id desc",conn,1,1
rs.movenext'这行为什么不管用呢?去了这行能显示本条记录,但是加上不能显示下条记录
response.write(rs("m_classid"))
rs.close
%>
请教高手指点
<%set rs=server.CreateObject("Adodb.recordset")
rs.open "select * from zs_news where m_classid="&classid&" order by m_id desc",conn,1,1
if not rs.eof then
rs.movenext
if not rs.eof then response.write(rs("m_classid"))
end if
rs.close
%>
试试吧
VBScript code:
<%
set rs = CreateObject("Adodb.recordset")
rs.CursorLocation = 3
rs.Open "select * from zs_news where m_classid=" & classid & " order by m_id desc", conn, 1, 1
Response.Write "记录数:" & rs.RecordCount
Do While not rs.EOF
response.write rs("m_classid")
rs.MoveNext
Loop
rs.Close
conn.Close
%>
rs.movenext要和
do while not rs.eof
....
rs.movenext
loop