<% set newconn2=server.createobject("adodb.connection") dbpath=server.mappath("datalthg.mdb") newconn2.open "driver={microsoft access driver (*.mdb)};dbq="&dbpath sqlcmd="select top 4 * from news where fenlan='企业动态' order by idnews DESC" set rs2=newconn2.execute(sqlcmd) if rs2.eof and rs2.bof then%> 相关资料正在更新中...! <%else do while not rs2.eof %> <%rs2.movenext loop end if rs2.close newconn2.close %>
· " target=_blank>

<%=rs2("title")%>

<%=rs2("addtime")%>
· 季度监测报告
<% set newconn3=server.createobject("adodb.connection") dbpath=server.mappath("datalthg.mdb") newconn3.open "driver={microsoft access driver (*.mdb)};dbq="&dbpath sqlcmd="select top 3 * from news where fenlan='hr' order by idnews DESC" set rs3=newconn3.execute(sqlcmd) if rs3.eof and rs3.bof then%> 相关资料正在更新中...! <%else do while not rs3.eof %> <%rs3.movenext loop end if rs3.close newconn3.close %>

诚招:<%=rs3("title")%>

 
 
 
     
<% set newconn4=server.createobject("adodb.connection") dbpath=server.mappath("datalthg.mdb") newconn4.open "driver={microsoft access driver (*.mdb)};dbq="&dbpath sqlcmd="select top 3 * from news where fenlan='zb' order by idnews DESC" set rs4=newconn4.execute(sqlcmd) if rs4.eof and rs4.bof then%> 相关资料正在更新中...! <%else do while not rs4.eof %> <%rs4.movenext loop end if rs4.close newconn4.close %>

<%=rs4("title")%>

   
<%dim l set newconn1=server.createobject("adodb.connection") dbpath=server.mappath("datalthg.mdb") newconn1.open "driver={microsoft access driver (*.mdb)};dbq="&dbpath sqlcmd="select * from news where fenlan='企业简介'" set rs1=newconn1.execute(sqlcmd) if rs1.eof and rs1.bof then%> 相关资料正在更新中...! <%else l=rs1("new") %> <%end if rs1.close newconn1.close %>
   
 
 
 
 
<%=left(l,510)%>......  
 
  |版权所有:洪泽蓝天化工科技有限公司
设为首页|加入收藏
 
  苏ICP备10061222号