<% sort = request("sort") page = request("page") if len(sort) = 0 or isnull(sort) or not isnumeric(sort) then sort = 0 if len(page)=0 or not isnumeric(page) then page = 1 keyword = trim(request("keyword")) if len(keyword) > 0 then sn = "查找产品" if sort>0 then sl = "and esort="&sort sql = "select * from product a inner join sort b on a.esort = b.sid where (b.sname like '%"&keyword&"%' or b.esname like '%"&keyword&"%' or a.pname like '%"&keyword&"%' or a.epname like '%"&keyword&"%' or a.pjs1 like '%"&keyword&"%' or a.epjs1 like '%"&keyword&"%' or a.pjs2 like '%"&keyword&"%' or a.epjs2 like '%"&keyword&"%') "&sl&" order by a.pn,a.pkey,a.pid desc" else if len(sort)=0 or sort = 0 or not isnumeric(sort) then sn = "查看所有产品" sql = "select * from product a inner join sort b on a.esort = b.sid where b.sid <> 231 order by a.pn,a.pkey,a.pid desc" else sql = "select * from sort where sid = "&sort set rstemp = conn.execute(sql) slevel = rstemp("slevel") parentsid = rstemp("parentsort") sn = rstemp("sname") if slevel = 0 then psid = rstemp("sid") end if rstemp.close if slevel = "0" then sonsort = "" sql = "select * from sort where parentsort = "&sort&" order by sid desc" set rstemp = conn.execute(sql) if not rstemp.eof then do while not rstemp.eof sortid = rstemp("sid") sonsort = sonsort &","&sortid rstemp.movenext loop end if rstemp.close end if sql="select * from product where esort in ("&sort&sonsort&") order by pn asc,pkey asc" end if end if pagesize = 9 set rs=server.createobject("adodb.recordset") rs.open sql,conn,1 if rs.eof then outputstring = "
暂无内容
" else rs.pagesize = pagesize totalpage = rs.pageCount totalrec = rs.RecordCount if totalpage*1 < page*1 then rs.close set rs = nothing outputstring = "
无法找到指定信息;
" else rs.absolutepage = page i = 0 precid = "" do while not rs.eof and i < pagesize pid = rs("pid") if i mod 3 = 0 then outputstring = outputstring &"" outputstring = outputstring &"
"&rs("pname")&"
在线定购
" rs.movenext i = i + 1 if i mod 3 = 0 then outputstring = outputstring &"" loop if i mod 3 > 0 then outputstring = outputstring &" " outputstring = ""&outputstring&"
" end if end if rs.close pagebar = "共 ["&totalrec&"] 条 总 ["&totalpage&"] 页 第 [ ] 页" ' pagebar = pagebar & "[第一页]" if page*1 <= 1 then pagebar = pagebar & "" else pagebar = pagebar &" [上一页] " if page*1 >= totalpage*1 then pagebar = pagebar & "" else pagebar = pagebar &" [下一页] " sid = sort if not isnumeric(sid) then sid = 0 if slevel = 0 then sql = "select * from sort where parentsort="&sid slp = sid else sql = "select * from sort where parentsort="&parentid slp = parentid end if if sid = slp then ft = " class=tf" sortlist = "查看所有产品" set rs = conn.execute(sql) do while not rs.eof tsd = rs("sid") if sid*1 = tsd*1 then ft = " class=tf" else ft = "" end if sortlist = sortlist &""&rs("sname")&"" rs.movenext loop function javastr(str) str = trim(str) if isnull(str) then javastr = " " else if len(str) = 0 then javastr = " " else javastr = replace(replace(replace(str,"'","\'"),"""","\"""),"/","\/") javastr = replace(javastr,chr(13)&chr(10),"\n") end if end if end function %> 浙江黄岩万事发塑料制品厂
 
 

版权所有(map):浙江黄岩万事发塑料制品厂    设计制作:中国商业网