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

我现在做了个后台会员查询的，但是老是出错，为什么，以下代码哪有错，请大侠指点小弟，谢谢
<% 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
%>