<%
Keyword=request("Keyword")
Keyword=replace(Keyword," ","")
page = Request.QueryString("page")
sql="select * from 试卷信息 where 试卷名称 like '%"&keyword&"%'"
rs.open sql,conn,1,1
dim page,maxPerPage
maxPerPage=2 '每页显示的记录数
rs.pagesize=MaxPerPage
if (page="" or isempty(page)) then page=1
thisUrl="2.asp?Keyword="&Keyword
session("adminOldUrl")=thisUrl&"&page="&page
%>