<% dim ccc:ccc=22%><% id=request("id") %><% cid=request("cid") %><% ClassID=request("ArticleID")%> <% if id="" or isnull(id) then sq="select * from Product order by id desc" else sq="select * from Product where id="&id&"" end if %> <% set re=server.CreateObject("adodb.recordset") re.open sq,conn,1,1 if re.eof then response.write "出错了" else set recc=server.CreateObject("adodb.recordset") sql="select * from Class where NumberID='"&re("class")&"'" recc.open sql,conn,1,1 %>
产品详细当前所在位置:首页 > 产品展示 > 产品详细
<%=re("productname")%>
【简述】:<%=re("spec")%>
【系列】:<% set rse=server.createobject("adodb.recordset") sql="select * from class where numberid='"&cid&"'" rse.open sql,conn,1,1 response.Write rse("class") %>
产品描述
<%=re("Content")%>
<% dim cl5 set cl5 =server.CreateObject("adodb.recordset") cl5.open "Select top 1 * from [Product] where productname<>'' and id<"&id&" order by id desc",conn,1,1 if not cl5.eof then%> <% do while not cl5.eof%>上一个:&id=<%=trim(cl5("id"))%>&cid=<%=cl5("class")%>" title="<%=trim(cl5("productname"))%>" ><%=trim(cl5("productname"))%> <% cl5.movenext loop%><% end if cl5.close:set cl5=nothing%>
<% dim cl6 set cl6 =server.CreateObject("adodb.recordset") cl6.open "Select top 1 * from [product] where productname<>'' and id>"&id&" order by id asc",conn,1,1 if not cl6.eof then%> <% do while not cl6.eof%>下一个:&id=<%=trim(cl6("id"))%>&cid=<%=cl6("class")%>" title="<%=trim(cl6("productname"))%>" ><%=trim(cl6("productname"))%> <% cl6.movenext loop%><% end if cl6.close:set cl6=nothing%>
<% recc.close set recc=nothing end if re.close set re=nothing %>