<%vMenu=9%> <%'GoLive Content Source set actus = ADORecordSet("base-msancerre" , "select * from Actus where Francais = true order by Tri", "block=0", "ID", "actus") %> <%'GoLive Content Source set parag = ADORecordSet("base-msancerre" , "select * from ActusParag where RefActu = " & actus.value("ID") & "", "block=1", "IDpresentParag", "parag") %> <%if 0 then%>
<%end if%>

Actualités

<% actus.MoveFirst %> <% while not actus.EOF %>
<%=actus.Value("Titre")%>
<%if actus.value("Photo")<>"" then if actus.value("AlignGauche") then response.write "" else response.write "" end if end if%>
<%=ConvertLineEndings(actus.Value("Texte"), false, true, false, false)%>
<%if actus.Value("LienTexte")<>"" then%> <%end if%> <%if (actus.Value("Video")<>"" and actus.value("VideoTitre")<>"") or (actus.Value("Phototheque")<>"" and actus.value("PhotothequeTitre")<>"") or not parag.eof then%> <%'GoLive Content Source set parag = ADORecordSet("base-msancerre" , "select * from ActusParag where RefActu = " & actus.value("ID") & "", "block=1", "IDpresentParag", "parag") %> <%end if%>
<% actus.MoveNext %> <% wend %>
<%if 0 then%>
<%end if%> <% if 0 then %><% end if %>