发新话题
打印

[求助]asp分页问题

[求助]asp分页问题

提示: ADODB.Recordset 错误 ';800a0cb3'; 对象或提供者不能执行所需的操作。 /callcenter/index_all.asp,行47 我用的是sybase数据库, 没有加分页程序之前运行正常,加入代码以后就运行不了 而且数据库链接都正常. 代码: <% if session("user_username")="" or session("user_flag")="" then response.redirect "login.asp" end if g_ywy=session("user_username") g_khlx=trim(request("g_khlx")) %> <span href="tag.php?name=%BA%F4%BD%D0%D6%D0%D0%C4" onclick="tagshow(event)" class="t_tag">呼叫中心</span>业务系统 <% set rs=Server.CreateObject("ADODB.Recordset") sql="select * from callcenter_guest where g_ywy=';"&g_ywy&"'; order by g_id desc" rs.open sql,conn,1,1 if rs.eof or bof then response.write " " rs.close Set rs=nothing else rs.Pagesize=6 pagecount=rs.PageCount page=int(request.QueryString ("page")) if page<=0 then page=1 if request.QueryString("page")="" then page=1 end if [color=#DC143C]//第47行[/color] rs.AbsolutePage=page %> <%for j=1 to rs.PageSize%> <% if rs.EOF then exit for end if %> <% i=1 if i mod 2=0 then %> <%else%> <%end if%> <% i=i+1 rs.movenext next %>
公司ID 项目名称 地区 城市 登记人 登记时间 次/天 客户类型 操作
还没有记录呢!
"><%=rs("g_id")%> &g_gsmc=<%=rs("g_gsmc")%>"><%=rs("g_gsmc")%>|<%=rs("g_lxr")%>|<%=rs("g_lxfs")%>
<%=rs("g_dz")%>
<%=rs("g_dq")%> <%=rs("g_cs")%> <%=rs("g_ywy")%> <%=rs("g_djsj")%> <%=rs("g_khlx")%> ">修改

一共有<%=pagecount%>页留言 你看的是第<%=page%>页 <%if page=1 and not page=pagecount then%> 下一页 <%elseif page=pagecount and not page=1 then%> 上一页 <%elseif page=1 and page=pagecount then%> <%else%> 上一页 下一页<% end if %>
<% rs.close Set rs=nothing end if %>

TOP

[求助]asp分页问题

page=int(request.QueryString ("page")) if page="" or page<1 or page>maxpage Then page=1 end if if not rs.eof then rs.absolutepage=page end if

TOP

[求助]asp分页问题

这个好像不是47行有什么问题吧 会不会出在end if上啊 if page<=0 then page=1 if request.QueryString("page")="" then page=1 end if //第47行 rs.AbsolutePage=page 第47行上面是不是少了一行end if啊

TOP

[求助]asp分页问题

多谢   问题解决了!

TOP

[求助]asp分页问题

rs.AbsolutePage=page应该放在数据库的打开语句之后的,好象是这样的

TOP

发新话题