Maxxam Analytics Inc

<% theURL = Request.ServerVariables("PATH_INFO") myBanner="" myFlash="banner_home_fr.swf" %> Maxxam Analytics Inc ;MM_openBrWindow('/pop.htm','pop','width=600,height=500')<%end if%>">

visite virtuelle de Maxxam

<% set conn = server.createObject("ADODB.connection") set rs = server.createObject("ADODB.recordSet") conn.open application("conn") rs.open "SELECT * FROM dbo.maxnews WHERE dbo.maxnews.archive = 0 AND dbo.maxnews.language = 'french' ORDER BY dbo.maxnews.date DESC", conn If NOT rs.EOF then%> Récentes nouvelles

<%Do While NOT rs.EOF %>

<% rs.MoveNext%> <%Loop%>

<%If rs("Date") > (DateAdd("m", -3, Now)) then %>

<%else%>

<%end if%>

<%=rs("title")%>

<%end if set rs = server.createObject("ADODB.recordSet") rs.open "SELECT * FROM dbo.maxevents WHERE dbo.maxevents.language = 'french' ORDER BY dbo.maxevents.date DESC", conn If NOT rs.EOF then%> Événements à venir

<%Do While NOT rs.EOF %>

<%=rs("title")%>

<% rs.MoveNext%> <%Loop rs.close conn.close set conn = nothing set rs = nothing%>

<%end if%>