Products <% classid = paichu(request("classid")) key = paichu(request("key")) if classid <>"" then classid = paichu(classid) end if Set Rs = Server.CreateObject("ADODB.RecordSet") If ClassID <> "" Then sql = "select * From Product where classid="&classid Else if key = "" then sql = "select * From Product where classid= 1 " else sql = "select * From Product where chnname like '%"&key&"%'" end if End If sql = sql&" order by id desc" Rs.Open sql, conn, 1, 1 pageno =Trim(Request("pageno")) if pageno="" or isnull(pageno) or isempty(pageno) then pageno=1 end if If Not Rs.Eof then Rs.PageSize=6 Rs.AbsolutePage = pageno End If If not Rs.Eof Then ''''''''''''''''''''如果找到信息''''''''''''''' For i=1 to Rs.PageSize If not Rs.Eof Then %> <% if (i mod 3)=0 then Response.Write("") end if Rs.MoveNext end if Next end if %> ">" width="123" height="100" border="0" /> " class="font">{<%=Rs("ChnName")%>} <% pagechar Rs,pageno %>