<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <%=web_rs_title%>
 
  最新公告
<% call rsopen(rss,"select top 1 N_id,N_title,N_addtime,N_content from N_news where N_issh=1 and N_type=299 order by N_addtime desc",1) if not ars.eof then %>
    <%=left(HTMLcode2(rss("N_content")),100)%>
<% end if call rsclose(rss) %>
  联系我们

郑州百瑞动物药业有限公司

办公电话:0371-60122709
传 真:0371-60122711
厂 址:新郑市东开发区新椿路北侧
电 话:0371-62428277
Q Q:1156456686
电子邮箱:bairuizhuyao@163.com
手 机:13333812108

      公司简介
  <%=JianJie3(38,300)%>
      养猪技术
<% call rsopen(rss,"select top 6 N_id,N_title,N_addtime from N_news where N_issh=1 and N_type=300 order by N_addtime desc",1) if rss.eof then else do while not rss.eof %> <% rss.movenext if rss.eof then exit do loop end if call rsclose(rss) %>
<%=formatdatetime(rss("N_addtime"),2)%>
产品展示
  
<% Set Rs = Server.CreateObject("ADODB.Recordset") Sql = "select P_id,P_pid,P_title,P_filename from P_products where P_issh=1 and P_pid<>315" Rs.Open Sql,conn,3,3 do while not rs.eof %> <% rs.movenext loop %>
" target="_blank">" width="145" height="110" border="0" />
"><%=Rs("P_title")%>
<% Rs.Close Set Rs=nothing %>
  产品列表
<% call rsopen(rss,"select top 8 P_id,P_title from P_products where P_issh=1 and P_pid<>315 order by P_istj,P_addtime desc",1) if rss.eof then else do while not rss.eof %> <% rss.movenext if rss.eof then exit do loop end if call rsclose(rss) %>
  行业资讯
<% call rsopen(rss,"select top 6 N_id,N_title,N_addtime from N_news where N_issh=1 and N_type=312 order by N_addtime desc",1) if rss.eof then else do while not rss.eof %> <% rss.movenext if rss.eof then exit do loop end if call rsclose(rss) %>
  最新留言
<% call rsopen(rss,"select top 5 M_id,M_content from M_messages where M_isck=1 order by M_addtime desc",1) if rss.eof then else do while not rss.eof %> <% rss.movenext if rss.eof then exit do loop end if call rsclose(rss) %>