<%
const MaxPerPage=20
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim spring
spring=request.form("spring")
if len(spring)=0 then
spring=request("spring")
if len(spring)=0 then
sql="select * from standard order by id desc"
else
sql="select * from standard where name like '%"&spring&"%'"
sql=sql & "or bid like '%"&spring&"%'"
sql=sql & "or title like '%"&spring&"%'"
sql=sql & "order by id desc"
end if
end if
Set rs = Server.CreateObject("ADODB.Recordset")%>
中国钟表网站
