电脑格式化d盘会怎样:ADODB.Recordset (0x800A0CB3)

ADODB.Recordset (0x800A0CB3)
当前记录集不支持书签。这可能是提供程序或选定的游标类型的限制。
/research/search.asp, 第 296 行
相关代码:
<%
sql="select * from search2"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,2,3
if rs.eof and rs.bof then
response.write "<p align='center'><font color=blue>没有相关记录</font>"
else
rs.movefirst
count_record=rs.recordcount
response.Write count_record
page_size=10
rs.pagesize=page_size
page_total=rs.pagecount
if isempty(request.querystring("page")) then
page=1
else
page=cint(request.querystring("page"))
end if
rs.absolutepage=page
i=page_size
do while not rs.eof and i>0
'if key="" or instr(rs("introduce"),key)>0 then
if rs("province")=rs("city") then
response.Write "<p style='text-indent:10px'>"&num&"、  <a href='../detail.asp?uni="&rs("uni")&"' target='_blank'><strong>"&rs("company")&"</strong></a>    性质:"&rs("kind")&"   地区:"&trim(cstr(rs("city")))
num=num+1
else
response.Write "<p style='text-indent:10px'>"&num&"、  <a href='../detail.asp?uni="&rs("uni")&"' target='_blank'><strong>"&rs("company")&"</strong></a>      性质:"&rs("kind")&"   地区:"&trim(cstr(rs("province")))&trim(cstr(rs("city")))
num=num+1
end if
rs.movenext
i=i-1
' else
' exit do
' end if
loop
%>
<%call PageControl(rs.recordcount,rs.pagecount,page,"border=0 align=left","<p align=left>")%>
<%
end if
rs.Close
rs2.close
set rs2=nothing
Set rs=nothing
conn.Close
Set conn=nothing
response.write "<br> "
%>