Error:ADODB.Recordset (0x800A0E78)
<%sub pic_body()%>
<% sql="select * from autopiccat" set rs=server.createobject("adodb.recordset") rs.open sql,conn,1,1 do while not rs.eof if request.querystring("piccat_id")<>Cstr(rs("piccat_id")) then %> "><%=rs("piccat_name")%> <%else%> <%=rs("piccat_name")%> <% end if rs.movenext loop if rs.eof and rs.bof then %> Return to have no picture at present classification <% end if dim totalpic,Currentpage,totalpages,i sql="select * from autopic order by pic_id DESC" if request.querystring("piccat_id")<>"" then sql="select * from autopic where piccat_id="&request.querystring("piccat_id")&" order by pic_id DESC" end if set rs=server.createobject("adodb.recordset") totalcs=rs.recordcount '些行出错 %> |
|
|
<% sql="select * from autopiccat" set rs=server.createobject("adodb.recordset") rs.open sql,conn,1,1 do while not rs.eof if request.querystring("piccat_id")<>Cstr(rs("piccat_id")) then %> "><%=rs("piccat_name")%> <%else%> <%=rs("piccat_name")%> <% end if rs.movenext loop if rs.eof and rs.bof then %> Return to have no picture at present classification <% end if dim totalpic,Currentpage,totalpages,i sql="select * from autopic order by pic_id DESC" if request.querystring("piccat_id")<>"" then sql="select * from autopic where piccat_id="&request.querystring("piccat_id")&" order by pic_id DESC" end if set rs=server.createobject("adodb.recordset") totalcs=rs.recordcount '些行出错 %> |
|
|