' <% srequete="select * from TABARTICLE where statut='actif' ORDER BY articleID DESC " set RS_srequete =Server.CreateObject("ADODB.Recordset") RS_srequete.Open srequete, con, 3, 3 'ORDER BY date_jour DESC srequete1="select * from TABARTICLE where statut='actif' ORDER BY articleID DESC " set RS_srequete1 =Server.CreateObject("ADODB.Recordset") RS_srequete1.Open srequete1, con, 3, 3 %> ASSOCIATION ARDHD, info ?
 
 

 
<% if RS_srequete.recordcount <>0 then '1 for i=1 to RS_srequete.recordcount %> <% RS_srequete.movenext next end if '1 %>
<%=RS_srequete("titre")%> "> (lien avec l'article)

 
 

<% if RS_srequete1.recordcount <>0 then '3 for i=1 to RS_srequete1.recordcount %> <% RS_srequete1.movenext next end if '3 %>
"> <%=RS_srequete1("titre")%>
<% if ( Instr(lcase(RS_srequete1("photo")),".gif") or Instr(lcase(RS_srequete1("photo")),".jpg") ) then %>
" width="269" height="202">
<%end if%>
<%=RS_srequete1("contenu")%>