错误类型:
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/blog/woyaodaili/daili.asp
代码:
<%
set rs=server.createobject("adodb.recordset")
page=request("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
sql="select * from daili order by date DESC"
rs.open sql,conn,3,1
if rs.eof then
%>
<tr bgcolor="#EEEEEE">
<td height="24" colspan="2" bgcolor="#FFFFFF">
<div align="center">
<font color="#FF0000" size="3">暂时没有代理信息!</font>
</div>
</td>
</tr>
<%
response.end
else
rs.pagesize=10
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
i=0
dim id(),dailiquyu(),dailimingcheng(),dailiren()
do while not rs.eof and (i<rs.pagesize)
i=i+1
redim preserve id(i),dailiquyu(i),dailimingcheng(i),dailiren(i)
id(i)=rs("id")
dailiquyu(i)=rs("dailiquyu")
dailimingcheng(i)=rs("dailimingcheng")
dailiren(i)=rs("dailiren")
rs.movenext
loop
end if
%>