一个EOF和BOF的问题 - ASP技术论坛

homellq

等　级：新手上路
帖　子：10
专家分：0
注　册：2012-8-28
结帖率：50%

楼主

已结贴√ 问题点数：4 回复次数：2

一个EOF和BOF的问题

我有一个a.asp页面，里面嵌套了两个iframe，分别src了两个页面：
左边的iframe是src="c.asp"，右边的iframe是src="d.asp"
奇怪的问题出现了，当c.asp里没有数据时，右边的d.asp有时候显示正常，有时候显示：

ADODB.Recordset '800a0bcd'

BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

\everyday_intable.asp, line 148

--------------------------------------------------------------------------------
Host by NetBox Version 2.8 Build 4128

请问是什么原因呀？应该怎么解决？谢谢！！

搜索更多相关主题的帖子: iframe　

2013-05-21 17:40

homellq

等　级：新手上路
帖　子：10
专家分：0
注　册：2012-8-28

第 3 楼

得分:0

上代码吧：
首先a.asp的代码如下：

<HTML><HEAD><TITLE></TITLE>
<LINK href="style/main.css" type=text/css rel=stylesheet>
<table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td width="49%"><div>
<iframe name="frmc" src="c.asp" width="100%" frameborder="0" ></iframe></div></td>
<td width="2%"> </td>
<td width="49%"><div>
<iframe name="frmd" src="d.asp" width="100%" frameborder="0" ></iframe></div></td>
</tr>
</table>
</body>
</html>

c.asp的代码如下：

<HEAD>
<TITLE></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META name="keywords" content="">
<META name="description" content="" >
</HEAD>
<BODY>
<%
set rs=server.createobject("adodb.recordset")
sql1="select * from bao where fabu=1
sql1=sql1&" order by date desc, id desc"
'response.write sql
'response.End
session("sql")=sql1
rs.open sql1,conn,2,2
rs.pagesize=MaxPerPage
%>
         <% j=1
            if not (rs.eof or err) then rs.move (page-1)*maxPerPage
            do while not rs.eof
            %>
            <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td width="7%" align="right">◎</td>
                <td width="5%"><span style="font-size:12px">√</span></td>
                <td><%=rs("introduce")%></td>
              </tr>
    <%
j=j+1
if j>maxperpage then exit do
rs.moveNext
loop
dim k
k=(j-1) mod num_row
'response.write j
'response.write "k="&k
if not (k=0) then
response.write "<td colspan="&(num_row-k)&" width="&(cint(100/num_row)*(num_row-k))&"> </td>"
response.write "</tr>"
end if
rs.close
set rs=nothing
%>
</table>
</body>
</html>

d.asp的代码如下：

<HEAD>
<TITLE></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META name="keywords" content="">
<META name="description" content="" >
</HEAD>
<BODY>
<%
set rs=server.createobject("adodb.recordset")
sql1="select * from bao where fabu=2
sql1=sql1&" order by date desc, id desc"
'response.write sql
'response.End
session("sql")=sql1
rs.open sql1,conn,2,2
rs.pagesize=MaxPerPage
%>
         <% j=1
            if not (rs.eof or err) then rs.move (page-1)*maxPerPage
            do while not rs.eof
            %>
            <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td width="7%" align="right">◎</td>
                <td width="5%"><span style="font-size:12px">√</span></td>
                <td><%=rs("introduce")%></td>
              </tr>
    <%
j=j+1
if j>maxperpage then exit do
rs.moveNext
loop
dim k
k=(j-1) mod num_row
'response.write j
'response.write "k="&k
if not (k=0) then
response.write "<td colspan="&(num_row-k)&" width="&(cint(100/num_row)*(num_row-k))&"> </td>"
response.write "</tr>"
end if
rs.close
set rs=nothing
%>
</table>
</body>
</html>

2013-05-22 22:45