提示:
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"))
%>
呼叫中心业务系统
| 公司ID |
项目名称 |
地区 |
城市 |
登记人 |
登记时间 |
次/天 |
客户类型 |
操作 |
<%
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%>
| "><%=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")%> |
">修改 |
<%
i=i+1
rs.movenext
next
%>
一共有<%=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
%>