<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> TaiZhou Joseph Electric Co., Ltd.
Your current position : Home > ProductsPRODUCTS
<% if request.querystring("d_id") then set rs=server.createobject("adodb.recordset") rs.Open "select * From product where d_id="&Request.QueryString("d_id"),conn,1,3 if not(rs.eof and rs.bof) then cname=rs("cname") rs("hotclick")=rs("hotclick")+1 rs.update end if rs.close end if %> <% rs.Open "select top 1 * From product where vip=0 and d_id < "&cint(Request.QueryString("d_id"))&" order by d_id desc",conn,1,1 if not rs.eof then %> <% else %> <%end if rs.close %> <% rs.Open "select top 1 * From product where vip=0 and d_id> "&cint(Request.QueryString("d_id"))&" order by d_id",conn,1,1 if not rs.eof then %> <% else %> <%end if rs.close %>
<%page=request.querystring("page") if page="" then page=1 end if page=cint(page) set rser=server.createobject("adodb.recordset") if request.QueryString("search")=1 then if request.Form("field_name")<>"" and request.Form("keyword")<>"" then sql="select * from product where "&request.Form("field_name")&"='"&request.Form("keyword")&"'" else response.write "" conn.close set rser=nothing response.end end if else sql="select * from product where d_id= "&trim(request.querystring("d_id")) end if rser.open sql,conn,1,3 if rser.eof then response.write "" conn.close set rser=nothing response.end end if if not rser.bof then rser("hotclick")=rser("hotclick")+1 rser.update %>
<%if rser("b_img")><"" then response.write "" else response.write"No picture!" end if%>
<%=rser("ename")%>
<%=rser("edetail")%>
<%else%> No records! <%end if%>
Next :  "><%=rs("ename")%>
Next :  NO
Previous :  "><%=rs("ename")%>
Previous :  NO