<%'GoLive Content Source set page = ADORecordSet("base-msancerre" , "select * from Page where IDpresent = 22", "block=1", "IDpresent", "page") %> <%vMenu=5 vChemin=page.value("DossierPhoto")%> <%'GoLive Content Source set parag = ADORecordSet("base-msancerre" , "select * from PageParag where RefPresent = " & page.value("IDpresent") & " order by Tri", "block=0", "IDpresentParag", "parag") %> <%if 0 then%>
<%end if%>

<%=page.Value("Titre")%>

<%=page.Value("Accroche")%>

<% parag.MoveFirst %> <% while not parag.EOF %> <%if parag.value("Titre")<>"" then%><%if parag.value("GrosTitre")=true then%>

<%=parag.Value("Titre")%>

<%else%>

<%=parag.Value("Titre")%>

<%end if%><%end if%><%if parag.value("paragraphe")<>"" then response.write("

")%><%if parag.value("Photo")<>"" then%><%vClassPhoto="actuphoto" if parag.value("AlignGauche") and parag.value("CadrePhoto") then vClassPhoto="actuphotod" if parag.value("AlignGauche") and not parag.value("CadrePhoto") then vClassPhoto="actuphotod2" if not parag.value("AlignGauche") and parag.value("CadrePhoto") then vClassPhoto="actuphoto" if not parag.value("AlignGauche") and not parag.value("CadrePhoto") then vClassPhoto="actuphoto2"%>

<%if parag.value("PhotoLegende")<>"" then%>
<%=parag.Value("PhotoLegende")%> <%end if%>
<%end if%><%if parag.value("paragraphe")<>"" then%><%=ConvertLineEndings(parag.Value("Paragraphe"), false, false, false, false)%>
<%if parag.value("Blank")=true then vTarget="_blank" else vTarget="_self"%><%if parag.value("LienURL")<>"" then%>

<%=parag.value("LienTexte")%>

<%end if%><%if parag.value("PDFTexte")<>"" then%>

<%=parag.value("PDFTexte")%>

<%end if%><% end if %> <% parag.MoveNext %> <% wend %>

<%if 0 then%>
<%end if%> <% if 0 then %><% end if %>