<%@LANGUAGE="VBSCRIPT"%> <% Dim documenti__MMColParam documenti__MMColParam = "1" If (Request.QueryString("IdRecord") <> "") Then documenti__MMColParam = Request.QueryString("IdRecord") End If %> <% Dim documenti Dim documenti_cmd Dim documenti_numRows Set documenti_cmd = Server.CreateObject ("ADODB.Command") documenti_cmd.ActiveConnection = MM_amici_STRING documenti_cmd.CommandText = "SELECT * FROM documenti WHERE IDdocumenti = ?" documenti_cmd.Prepared = true documenti_cmd.Parameters.Append documenti_cmd.CreateParameter("param1", 5, 1, -1, documenti__MMColParam) ' adDouble Set documenti = documenti_cmd.Execute documenti_numRows = 0 %> Disabili mentali: amici senza limiti

Tutti i documenti

 

<%=(documenti.Fields.Item("titolo").Value)%>

<%=(documenti.Fields.Item("autore").Value)%>

<%=(documenti.Fields.Item("data").Value)%>

 

<%=(documenti.Fields.Item("immagine1").Value)%>
<%=(documenti.Fields.Item("didascsalia1").Value)%>

<%=(documenti.Fields.Item("testo1").Value)%>

 

<%=(documenti.Fields.Item("immagine2").Value)%>
<%=(documenti.Fields.Item("didascalia2").Value)%>

<%=(documenti.Fields.Item("testo2").Value)%>

 

<%=(documenti.Fields.Item("immagine3").Value)%>
<%=(documenti.Fields.Item("didascalia3").Value)%>

<%=(documenti.Fields.Item("testo3").Value)%>

 

<%=(documenti.Fields.Item("immagine4").Value)%>
<%=(documenti.Fields.Item("didascalia4").Value)%>

<%=(documenti.Fields.Item("testo4").Value)%>

 

<%=(documenti.Fields.Item("immagine5").Value)%>
<%=(documenti.Fields.Item("didascalia5").Value)%>

<%=(documenti.Fields.Item("testo5").Value)%>

 

<%=(documenti.Fields.Item("immagine6").Value)%>
<%=(documenti.Fields.Item("didascalia6").Value)%>

<%=(documenti.Fields.Item("testo6").Value)%>

 

<%=(documenti.Fields.Item("immagine7").Value)%>
<%=(documenti.Fields.Item("didascalia7").Value)%>

<%=(documenti.Fields.Item("testo7").Value)%>

 

<%=(documenti.Fields.Item("immagine8").Value)%>
<%=(documenti.Fields.Item("didascalia8").Value)%>

<%=(documenti.Fields.Item("testo8").Value)%>

 

<%=(documenti.Fields.Item("immagine9").Value)%>
<%=(documenti.Fields.Item("didascalia9").Value)%>

<%=(documenti.Fields.Item("testo9").Value)%>

 

<%=(documenti.Fields.Item("immagine10").Value)%>
<%=(documenti.Fields.Item("didascalia10").Value)%>

<%=(documenti.Fields.Item("testo10").Value)%>

 

Tutti i documenti

Hai stampato una pagina del sito www.santegidio.org

<% documenti.Close() Set documenti = Nothing %>