Gioco del lotto

<% Function VerSeBisestile(yr) If (yr Mod 4 = 0 And yr Mod 100 <> 0) Or yr Mod 400 = 0 Then VerSeBisestile = True Else VerSeBisestile = False End If End Function Function MostraSanto(data) dim arrSanti, dataInizio, giorniTrascorsi, strResult arrSanti = Array("S. Maria di Dio " , _ "SS. Basilio e Gregorio " , _ "S. Genoveffa vergine " , _ "B. Angela da Foligno " , _ "S. Simeone stilita " , _ "Epifania di N.S.G.C. " , _ "S. Raimondo di Penyafort " , _ "S. Massimo vescovo " , _ "S. Giuliano martire " , _ "S. Gregorio X papa " , _ "S. Lucio vescovo " , _ "SS. Maurizio e Celestino " , _ "S. Ilario vescovo " , _ "S. Bianca abbadessa " , _ "S. Paolo eremita " , _ "S. Priscilla martire " , _ "S. Antonio abate " , _ "S. Beatrice vergine " , _ "S. Mario martire " , _ "S. Sebastiano martire " , _ "S. Agnese vergine " , _ "S. Vincenzo diacono " , _ "S. Messalina vergine " , _ "S. Feliciano vescovo " , _ "Conv. di S. Paolo apost. " , _ "S. Paola vedova " , _ "S. Angela Merici " , _ "S. Tommaso d'Aquino " , _ "S. Costanzo patrono di PG " , _ "S. Giacinta martire " , _ "S. Giovanni Bosco " , _ "S. Severo vescovo " , _ "S. Lorenzo vescovo " , _ "S. Biagio vescovo " , _ "S. Andrea Corsini " , _ "S. Agata vergine e martire " , _ "S. Silvano martire " , _ "S. Giuliano vescovo " , _ "S. Girolamo Emiliani " , _ "S. Apollonia martire " , _ "S. Scolastica vergine " , _ "B. Maria vergine di Lourdes " , _ "S. Modesto martire " , _ "S. Caterina DS Ricci " , _ "S. Valentino martire " , _ "SS. Faustino e Giovita " , _ "S. Samuele martire " , _ "S. Emilia vergine " , _ "S. Bernardetta Soubirous " , _ "S. Mansueto vescovo " , _ "S. Claudio martire " , _ "S. Eleonora vergine " , _ "S. Margherita da Cortona " , _ "S. Policarpo vescovo " , _ "S. Aurelio martire " , _ "S. Cesario di Nazianzo " , _ "S. Pietro Eymard sac. " , _ "S. Gabriele dell'Addolorata " , _ "S. Giusto martire in Roma " , _ "Beata Antonia di Firenze " , _ "S. Albino vescovo " , _ "B. Eraclio martire " , _ "S. Marino martire " , _ "S. Casimiro " , _ "S. Foca martire " , _ "S. Marciano " , _ "S. Teofilo vescovo " , _ "S. Cataldo " , _ "S. Francesca Romana " , _ "S. Simplicio I papa " , _ "S. Teresa Margherita " , _ "S. Bernardo vescovo " , _ "S. Patrizia " , _ "S. Matilde regina " , _ "S. Vincenza Gerosa " , _ "S. Agapito vescovo " , _ "S. Patrizio vescovo " , _ "S. Cirillo di Gerusalemme " , _ "S. Giuseppe sposo di M.V. " , _ "S. Claudia martire " , _ "S. Donnino martire " , _ "S. Benvenuto vescovo " , _ "S. Lea vedova " , _ "S. Simeone martire " , _ "S. Ireneo vescovo e mart. " , _ "S. Felice vescovo " , _ "S. Lidia martire " , _ "S. Teodora " , _ "S. Cirillo diacono " , _ "B. Amedeo di Savoia " , _ "S. Amos profeta " , _ "S. Macario confessore " , _ "S. Urbano vescovo " , _ "S. Sisto I papa " , _ "S. Isidoro vescovo e martire " , _ "S. Vincenzo Ferrer " , _ "S. Diogene martire " , _ "S. Ermanno martire " , _ "S. Dionigi vescovo " , _ "S. Maria di Cleofa " , _ "S. Apollonio martire " , _ "S. Stanislao vescovo " , _ "S. Damiano vescovo di Pavia " , _ "S. Ermenegildo martire " , _ "SS. Valeriano Massimo e Tiburzio " , _ "S. Anastasia martire " , _ "S. Lamberto martire " , _ "S. Arcangelo " , _ "S. Eleuterio vescovo " , _ "S. Leone IX papa " , _ "S. Agnese da Montepulciano " , _ "S. Anselmo vescovo " , _ "S. Giacomo martire " , _ "S. Adalberto vescovo " , _ "S. Saba martire " , _ "S. Marco evangelista " , _ "B. Vergine del buon consiglio " , _ "S. Ida vergine " , _ "S. Valeria vergine " , _ "S. Caterina da Siena " , _ "S. Sofia vergine e martire " , _ "S. Geremia " , _ "S. Atanasio vescovo " , _ "S. Giovenale vescovo " , _ "S. Ciriaco vescovo " , _ "S. Angelo martire " , _ "S. Benedetta vergine " , _ "S. Flavio martire " , _ "S. Vittore martire " , _ "S. Pacomio abate " , _ "S. Isidoro agricoltore " , _ "S. Fabio martire " , _ "SS. Nereo e Achilleo martiri " , _ "S. Emma vergine " , _ "S. Mattia apostolo " , _ "S. Torquato martire " , _ "S. Ubaldo vescovo di Gubbio " , _ "S. Pasquale Baylon " , _ "S. Felice da Cantalice " , _ "S. Crispino da Viterbo " , _ "S. Bernardino da Siena " , _ "S. Vittorio martire " , _ "S. Rita da Cascia " , _ "S. Giovanna Antida Touret " , _ "S. Corinna " , _ "S. M. Maddalena de' Pazzi " , _ "S. Filippo Neri sacerdote " , _ "S. Agostino v. di Canterbury " , _ "S. Emilio martire " , _ "S. Massimo vescovo " , _ "S. Giovanna d'Arco " , _ "S. Petronilla vergine " , _ "S. Fortunato martire " , _ "S. Eugenio papa " , _ "S. Clotilde regina " , _ "S. Quirino martire " , _ "S. Bonifacio vescovo " , _ "S. Norberto vescovo " , _ "S. Roberto abate " , _ "S. Guglielmo abate " , _ "S. Giuliano monaco " , _ "Sacro Cuore di Gesù " , _ "Cuore Imm. della B.Vergine " , _ "S. Onofrio anacoreta " , _ "S. Antonio di Padova " , _ "S. Eliseo profeta " , _ "SS. Vito e CC. mm. " , _ "S. Aureliano vescovo " , _ "S. Ranieri confessore " , _ "S. Calogero eremita " , _ "S. Giuliana Falc. " , _ "Madonna della Consolazione " , _ "S. Luigi Gonzaga " , _ "S. Paolino vescovo " , _ "S. Lanfranco martire " , _ "Natività di S. Giovanni " , _ "S. Massimo confessore " , _ "S. Elisa vergine " , _ "S. Cirillo d'Alessandria " , _ "S. Marcella martire " , _ "SS. Pietro e Paolo " , _ "SS. Protomartiri Romani " , _ "S. Teodorico Prete di Reims " , _ "S. Ottone vescovo " , _ "S. Tommaso apostolo " , _ "S. Ulderico vescovo " , _ "S. Antonio Maria Zaccaria " , _ "S. Maria Goretti vergine e martire" , _ "S. Claudio martire " , _ "S. Adriano papa " , _ "S. Veronica Giuliani " , _ "S. Felicita martire " , _ "S. Benedetto abate " , _ "S. Giovanni Gualberto abate " , _ "S. Enrico imperatore 'Il pio' " , _ "S. Francesco Solano " , _ "S. Bonaventura vesc. " , _ "B. Vergine del Carmelo " , _ "S. Alessio confessore " , _ "S. Federico vescovo " , _ "S. Arsenio diacono " , _ "S. Aurelio vescovo " , _ "S. Lorenzo da Brindisi " , _ "S. M.Maddalena di Marsiglia " , _ "S. Apollinare " , _ "S. Cristina vergine " , _ "S. Giacomo apostolo " , _ "SS. Gioacchino e Anna " , _ "S. Celestino I papa " , _ "SS. Nazario e Celso martiri " , _ "S. Marta vergine " , _ "S. Pietro crisologo " , _ "S. Ignazio di Loyola " , _ "S. Alfonso Maria de' Liguori " , _ "S. Maria degli Angeli " , _ "S. Pietro vesc. di Anagni " , _ "S. Giovanni Maria Vianney " , _ "Maria SS. della neve " , _ "Trasfigurazione del Signore " , _ "S. Gaetano sacerdote " , _ "S. Domenico di Guzman " , _ "S. Romano martire " , _ "S. Lorenzo martire " , _ "S. Chiara d'Assisi " , _ "S. Eusebio vescovo " , _ "SS. Ponziano e Ippolito martiri " , _ "S. Massimiliano K. " , _ "Assunzione di Maria vergine " , _ "S. Stefano re d'Ungheria " , _ "S. Chiara da Montefalco " , _ "S. Elena imperatrice " , _ "S. Magno vescovo " , _ "S. Bernardo abate " , _ "S. Pio X papa " , _ "B. Vergine Maria regina " , _ "S. Rosa da Lima vergine " , _ "S. Bartolomeo patrono di Benevento" , _ "S. Giuseppe Calasanzio " , _ "S. Teresa Jornet Ibars " , _ "S. Monica madre di S.Agostino " , _ "S. Agostino vescovo " , _ "Martirio di S.Giovanni Battista " , _ "S. Pietro eremita " , _ "S. Raimondo Nonnato " , _ "S. Egidio abate " , _ "S. Elpidio vescovo " , _ "S. Gregorio Magno papa " , _ "S. Rosa da Viterbo " , _ "S. Lorenzo Giustiniani " , _ "S. Petronio vescovo " , _ "S. Regina vergine martire " , _ "Natività di Maria vergine " , _ "S. Doroteo martire " , _ "S. Nicola da Tolentino " , _ "S. Emiliano martire " , _ "SS. Nome di Maria vergine " , _ "S. Giovanni Crisostomo " , _ "Esaltazione della S. Croce " , _ "B.V. Maria Addolorata " , _ "SS. Cornelio e Cipriano " , _ "S. Roberto Bellarmino " , _ "S. Irene vergine " , _ "S. Gennaro vescovo " , _ "S. Teodoro martire " , _ "S. Matteo apostolo " , _ "S. Maurizio martire " , _ "S. Padre Pio da Pietrelcina " , _ "S. Pacifico da S. Severino " , _ "S. Giuseppe Pign. " , _ "S. Damiano Martire " , _ "S. Vincenzo de' Paoli " , _ "S. Massimo martire " , _ "SS. Michele Gabriele e Raffaele " , _ "S. Girolamo presbitero e dott. " , _ "S. Teresa del Bambino Gesù " , _ "SS. Angeli custodi " , _ "S. Gerardo abate " , _ "S. Francesco d'Assisi " , _ "S. Flaviana martire " , _ "S. Maria Francesca " , _ "Beata Vergine Maria del Rosario " , _ "S. Demetrio martire " , _ "S. Dionigi vescovo " , _ "SS. Cassio e Fiorenzo " , _ "S. Germano vescovo " , _ "S. Lucia Filippini " , _ "S. Edoardo re " , _ "S. Callisto I papa " , _ "S. Teresa d'Avila " , _ "S. Margherita Alac. " , _ "S. Ignazio d'Antiochia " , _ "S. Luca evangelista " , _ "S. Pietro d'Alcantara " , _ "S. Contardo Ferrini " , _ "S. Orsola martire " , _ "S. Marco vescovo " , _ "S. Giovanni da Cap. " , _ "S. Marco solitario " , _ "S. Bonifacio I papa " , _ "S. Florio martire " , _ "S. Frumenzio vescovo " , _ "SS. Simone e Giuda " , _ "S. Narciso vescovo " , _ "S. Massimo martire " , _ "S. Antonino Vescovo " , _ "Tutti i Santi " , _ "Commemorazione Defunti " , _ "S. Uberto vescovo " , _ "S. Carlo Borromeo " , _ "S. Zaccaria profeta " , _ "S. Leonardo abate " , _ "S. Ernesto abate " , _ "S. Goffredo abate " , _ "S. Oreste martire " , _ "S. Andrea Avellino " , _ "S. Martino vescovo " , _ "S. Giosafat vescovo e martire " , _ "S. Omobono patrono di Cremona " , _ "S. Veneranda vergine " , _ "S. Alberto Magno " , _ "S. Agnese di Assisi " , _ "S. Elisabetta Regina " , _ "S. Frediano vescovo " , _ "S. Gelasio I papa " , _ "Gesù Cristo Re " , _ "S. Alberto vescovo e martire " , _ "S. Cecilia vergine e martire " , _ "S. Giovanni della Croce " , _ "S. Crisogono martire " , _ "S. Caterina vergine e martire " , _ "S. Corrado vescovo " , _ "S. Valeriano vescovo " , _ "S. Rufo martire " , _ "S. Saturnino martire " , _ "S. Andrea apostolo " , _ "S. Eligio vescovo " , _ "S. Bibiana vergine e martire " , _ "S. Francesco Saverio " , _ "S. Barbara vergine " , _ "S. Saba abate " , _ "S. Nicola di Bari " , _ "S. Ambrogio vescovo " , _ "Immacolata Concezione " , _ "S. Siro vescovo " , _ "S. Adeodato vescovo " , _ "S. Damaso I papa " , _ "S. Costanzo martire " , _ "S. Lucia vergine " , _ "S. Giovanni della Croce " , _ "S. Ireneo martire " , _ "S. Adelaide vergine " , _ "S. Viviana vergine " , _ "S. Quinto martire " , _ "S. Fausta martire " , _ "S. Giulio martire " , _ "S. Pietro Canisio " , _ "SS. Demetrio e Onorato " , _ "S. Vittoria martire " , _ "S. Adele vergine " , _ "Natale di N.S.G.C. " , _ "S. Stefano protomartire " , _ "S. Giovanni apostolo " , _ "Santi Innocenti martiri " , _ "S. David re profeta " , _ "S. Marcello martire " , _ "S. Silvestro papa") dataInizio = DateSerial(Year(data),1,1) If VerSeBisestile(Year(data)) Or (Month(data) <= 2 And Day(data) <= 29) Then giorniTrascorsi = DateDiff("d", dataInizio, data) Else giorniTrascorsi = DateDiff("d", dataInizio, data) + 1 End If MostraSanto = DateValue(data) & " - " & Trim(arrSanti(giorniTrascorsi)) End Function Response.Write MostraSanto(Now()) %>

---il numero di utenti collegati: <%= Application("ActiveUsers") %>

Menu principale: