<% set conn=server.CreateObject("Adodb.connection") conn.Provider="Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Palais.mdb") conn.ConnectionTimeout = 0 conn.Open set rs=server.CreateObject("adodb.recordset") %>
Back to Home Page
English version
<% Query_ID = Request.QueryString("id") %> <%SQL_query = "select * from coupure where id ="& Query_ID Set rs = conn.Execute(SQL_query)%> Coupures de Presse
<%if rs("title_scan") <> "0" then%> " border="0" alt="">
<%end if%>
<%if rs("coupure_image") <> "0" then%> " border="0" alt="" align="right"> <%end if%>

<%=rs("coupure_title")%>

<%=rs("coupure_text")%>


Retour
<%rs.Close %> <%Conn.Close %>