<% '产品大类名字 Function ProductBigClassName(ID) if not isNumeric(id) then ID=0 set rsb=conn.execute("select category from category2 where categoryid="&ID) if not rsb.eof then ProductBigClassName=rsb(0) end if rsb.close set rsb=nothing End Function '产品小类名 Function ProductSmallClassName(ID) if not isNumeric(id) then ID=0 set rsb=conn.execute("select sorts from sorts where sortsid="&ID) if not rsb.eof then ProductSmallClassName=rsb(0) else ProductSmallClassName="无小类" end if rsb.close set rsb=nothing End Function Function NewsClassName(ID) if not isNumeric(id) then ID=0 set rsb=conn.execute("select category from newClass where categoryid="&ID) if not rsb.eof then NewsClassName=rsb(0) else NewsClassName="" end if rsb.close set rsb=nothing End Function %>