<%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
<form id="form1" runat="server">
<div>
<script type="text/javascript">
function oo(a){
document.getEleme ......
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xht ......
