在线等待大侠帮忙!!!!!!!!!!

zigine 2003-07-26 04:46:43
我现在做了个后台会员查询的,但是老是出错,为什么,以下代码哪有错,请大侠指点小弟,谢谢
<% response.buffer=true %>
<%' on error resume next %>
<%
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' 文件名:membersearch.asp
' 功能:后台会员综合查询
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<!--#include file="functions.asp" -->
<!--#include file="../conn_1.asp" -->

<%

If session("adminuserid")= "" then
Response.Redirect "login.asp?link=membersearch.asp"
else
if instr(session("right"), "2")<=0 then '2是会员管理的权限编号

%>
<p align=center>抱歉,您没有会员管理的权限。</p>
<%
response.end
end if
end if



If Request.QueryString("step")="del" then
strSQL="delete from yiyatrans where id in id=("&Request.Form("id")&")"
Conn.Execute(strSQL)
end if


If Request.Form("zhanghao") <> "" then
strsearch = strsearch & " zhanghao like '%" &Request.Form("zhanghao")& "%' and "
End IF

strsearch=left(strsearch,len(strsearch)-4)

Set rssearch = Server.CreateObject("ADODB.RecordSet")

rssearch.Open strsearch,Conn,3

'response.Write("sdfsfdas")
'response.End()

rssearch.PageSize =Pagesize
%>
...全文
11 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
zigine 2003-07-26
好的,解决了,谢谢各位,我去加分了
还是认真自已写好了,谢了支持
回复
danjingwu 2003-07-26
有提提示是哪里错误吗?
回复
slippers3000 2003-07-26
提示什么地方的错误阿!
是不是 rssearch.PageSize =Pagesize
如果这样就是
rssearch.Open strsearch,Conn,3 -=》 rssearch.Open strsearch,Conn,3,1
回复
sgmao 2003-07-26
分页好不能以这种方式打开
rssearch.Open strsearch,Conn,3

rssearch.Open strsearch,Conn,1,1
回复
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2003-07-26 04:46
社区公告
暂无公告