<%if request("bigid")<>"" then bigid=srequest(trim(request("bigid")),1) if isnumeric(bigid) then maxnum=conn.execute("select max(bigid) from pro_big")(0) if int(bigid) > int(maxnum) then response.Redirect("ywly.html") response.End() else showname=conn.execute("select bigid,bigname from pro_big where bigid="&bigid&"")(1) end if else response.Redirect("ywly.html") response.End() end if else showname="业务领域" end if%> <%=showname%>_<%=conn.execute("select banquan from sys")(0)%> " /> " />
<%if request("bigid")<>"" then sql="select proid,proname,tupian,bigid from product where bigid="&bigid&" order by proid asc" else sql="select proid,proname,tupian from product order by proid asc" end if set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 if rs.eof and rs.bof then%> <%else rs.pagesize=9 page = cint(request("page")) if page = "" then page = 1 if not(isnumeric(page)) then page=1 if page<1 then page=1 if page >= rs.pagecount then page = rs.pagecount rs.absolutepage = page%> <%rs.close:set rs=nothing%>