Organizzazione Congressi - SERVIZITALIA- Congressi, Video, Audio, Maxischermi,Agenzia di Viaggio

	L'AZIENDA Il profilo aziendale, la missione e il nostro staff		SERVIZI L'elenco dei nostri servizi divisi per categorie
	PORTFOLIO Tutti i lavori realizzati da ServizItalia nel tempo		CLIENTI Le realtà più prestigiose che hanno scelto noi
	PRESS Le immagini delle nostre campagne di stampa		CONTATTI Un modo semplice e veloce per contattarci
	LINK Alcuni siti web che vi invitiamo a visitare		GIOSALTUR La nostra agenzia di viaggi al tuo servizio
	LAVORA CON NOI Vuoi entrare a far parte anche tu del nostro team?		VIDEOEVENTI Alcuni tra gli eventi che abbiamo curato visibili in Video

<% Function ScriviIData(data) giorno = Day(data) mese = Month(data) anno = Year(data) ScriviIData = mese & "/" & giorno & "/" & anno End Function Function ScriviData(data) giorno = Day(data) mese = Month(data) anno = Year(data) ScriviData = giorno & "/" & mese & "/" & anno End Function Set Connection = Server.CreateObject("ADODB.Connection") Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database") & "/servizitalia.mdb" SQL = "SELECT TOP 5 id, titolo, sede, luogo, datainizio, datafine FROM eventi WHERE datafine > # " & ScriviIData(Date()) & "# And cancellato = False ORDER BY datainizio ASC" Set RS = Connection.Execute(SQL) If RS.EOF Then Response.Write "

Nessun evento in programma

" Else Do While Not RS.EOF cong = "" If Len(RS("sede")) > 0 And Len(RS("luogo")) > 0 Then cong = " - " If ScriviData(RS("datainizio")) = ScriviData(RS("datafine")) Then data = ScriviData(RS("datainizio")) Else data = ScriviData(RS("datainizio")) & " - " & ScriviData(RS("datafine")) End If %>

">
"><%=RS("titolo")%>
<%=RS("sede") & cong & RS("luogo")%>
<%=data%>

<% RS.MoveNext Loop End If RS.Close Set RS = Nothing Connection.Close Set Connection = Nothing %>

Vai all'elenco completo delle notizie e degli eventi ServizItalia


	Consultate le Offerte LAST MNUTE di GIOSALTUR... Telefonate alla nostra agenzia di viaggi: 091.730.26.28


	NOLEGGIO MAXISCHERMI Servizitalia mette a disposizione il servizio DisplayMobile con una tecnologia all'avanguardia nei tempi. Segui il link per saperne di piu'!

	LAVORA CON NOI Diventa Hostess o Steward ServizItalia. Se sei una persona dinamica e di bella presenza compila subito la nostra scheda!