我的ASP网站一个我完全想不明白的问题,关于BOF 或 EOF 中有一个是“真”错误
各位,我做的网站有一个很不可思议的问题:用的左右框架模式,左边的导航栏有很多链接,比如A1,A2,A3,A4,如果我现在的页面停留在A1或者A4上,然后点击进入A3页面,数据库中没有数据的话程序根据iRecCount<1,显示没有记录;但是如果我停留在A2页面,然后点击进入A3页面,数据库中有记录就正确显示,没有记录就直接显示错误:BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。我的A1、A2、A3页面之间没有任何的参数传递,请问各位是什么问题啊!!!另外,如果我把A3的.Condition设置为"1=1"就没有这个问题了,太让人头疼了。
我用的分页是叶子的分页模块,A2的分页部分代码如下(A1、A3类似):
<%
dim key
if Request("k")<>"" then
key="EmployeeCode='"&Request("k")&"'"
else
key=""
end if
Dim ors
Set ors=new Cls_vbsPage '创建对象
Set ors.Conn=conn '得到数据库连接对象
With ors
.PageSize=20 '每页记录条数
.PageName="Pages" 'cookies名称
.DbType="MSSQL"
'数据库类型,AC为access,MSSQL为sqlserver2000存储过程版,MYSQL为mysql,PGSQL为PostGreSql
.RecType=0
'记录总数(>0为另外取值再赋予或者固定值,0执行count设置存cookies,-1执行count不设置cookies)
.JsUrl="../include/" 'Cls_jsPage.js的路径
.Pkey="ID" '主键
.Field="EmployeeCode,EmployeeName,MeetingContent,StartTime,EndTime,AllotRoom,MeetingStatus,ID"
.Table="ApplyMeetingRoom"
.Condition=key '条件,不需要where
.OrderBy="ID DESC" '排序,不需要order by,需要asc或者desc
End With
iRecCount=ors.RecCount()'记录总数
iRs=ors.ResultSet() '返回ResultSet
If iRecCount<1 Then
%>
<div align="center"><br /><br /><br />对不起,还没有任何数据...</div>
<% Else %>显示数据
<% end if%>