La Quercia Verde Fattorie Didattiche Piacenza Lega Ambiente Turismo Terra Nostra Agriturismo Emila Romagna
<% mesi= Array( "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov","Dec") Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("mdb-database/quercia2.mdb") if request("cancella")<>"" then conn.execute "DELETE FROM news WHERE id="&request("cancella") Set rs = Server.CreateObject("ADODB.Recordset") sql = "SELECT * FROM news ORDER BY data DESC" rs.Open sql, conn do while not rs.eof %> <% rs.movenext loop rs.close set rs=nothing conn.close set conn=nothing %>

<%=rs("titolo")%>
<%if rs("allegato")<>"" then response.write " Allegato
"%> <%if rs("allegato2")<>"" then response.write " Secondo Allegato
"%> <%if rs("allegato3")<>"" then response.write " Terzo Allegato
"%> <%if rs("link")<>"" then response.write "
Sito Internet "%>

 

AGRITURISMO "LA QUERCIA VERDE" - Strada Visconti 868 - 29010 Alseno (PC) - tel. 338.4196961 - fax 0523.947523 - e-mail info@laquerciaverde.it - Credits