<%@LANGUAGE="VBSCRIPT"%> <% Dim dati_seminario__MMColParam dati_seminario__MMColParam = "1" If (Request("MM_EmptyValue") <> "") Then dati_seminario__MMColParam = Request("MM_EmptyValue") End If %> <% Dim dati_seminario Dim dati_seminario_numRows Set dati_seminario = Server.CreateObject("ADODB.Recordset") dati_seminario.ActiveConnection = MM_itiskennedy_STRING dati_seminario.Source = "SELECT * FROM notizie WHERE posizione = '" + Replace(dati_seminario__MMColParam, "'", "''") + "'" dati_seminario.CursorType = 0 dati_seminario.CursorLocation = 2 dati_seminario.LockType = 1 dati_seminario.Open() dati_seminario_numRows = 0 %> <% Dim elenco_seminari__MMColParam elenco_seminari__MMColParam = "1" If (Request.QueryString("id") <> "") Then elenco_seminari__MMColParam = Request.QueryString("id") End If %> <% Dim elenco_seminari Dim elenco_seminari_numRows Set elenco_seminari = Server.CreateObject("ADODB.Recordset") elenco_seminari.ActiveConnection = MM_itiskennedy_STRING elenco_seminari.Source = "SELECT * FROM seminari WHERE id = " + Replace(elenco_seminari__MMColParam, "'", "''") + "" elenco_seminari.CursorType = 0 elenco_seminari.CursorLocation = 2 elenco_seminari.LockType = 1 elenco_seminari.Open() elenco_seminari_numRows = 0 %> Itiskennedyidee. - Prenotazione

Itiskennedyidee.

<%=(dati_seminario.Fields.Item("titolo").Value)%>   Modulo di prenotazione - ATTENZIONE...
" alt="Seminari">

<%=Testo_Data_Esteso(elenco_seminari.Fields.Item("data").Value)%>
<%=(elenco_seminari.Fields.Item("relatore").Value)%>
<%=(elenco_seminari.Fields.Item("titolo").Value)%>

 

ATTENZIONE,

alcune informazioni necessarie per poter effettuare la prenotazione non sono state inserite.

La preghiamo cortesemente di tornare alla pagina precedente e di completare il modulo di prenotazione.

<<< Torna al modulo di prenotazione.

 
<%=(dati_seminario.Fields.Item("sottotitolo").Value)%>
<%=InserisciBR((dati_seminario.Fields.Item("descrizione").Value))%>

 

Home Page | Seminari | ...

<% dati_seminario.Close() Set dati_seminario = Nothing %> <% elenco_seminari.Close() Set elenco_seminari = Nothing %>