Mostrare il segno zodiazale del giorno

ASP E-Commerce con ASP Menu Javascript Ricette Cocktail Registrazione domini Area Aziende

Home + Articoli + Date e Calendari + Articolo # 54

Concesso in esclusiva a Mr.Webmaster. Vietata la riproduzione.

Grazie alle potenti funzioni per la gestione delle date che VBScript mette a disposizione è possibile realizzare delle simpatiche utility, adatte a siti amatoriali che accolgono calorosamente i propri utenti con messaggi accattivanti, come gli auguri per il compleanno; in questo Articolo vedremo come lanciare a video un messaggio di auguri agli utenti il cui compleanno è prossimo, ovvero individuando il segno zodiacale.

Per convenzione ci sono periodi a cavallo di due mesi che danno luogo al segno zodiacale del momento: ad esempio i nati tra 21 Dicembre ed il 19 gennaio sono dei capricorno, e cosi via.

Lo script che segue non fa altro recuperare il giorno ed il mese corrente; lancia una condizione per individuare il mese ed a seconda che il giorno sia superiore o inferiore a quello indicato nella singola condizione, il segno corrente sarà diverso. Di seguito il codice:

<%@LANGUAGE = VBScript%>
<%
    Dim gg, mm, segno
    gg = Day(Now())
    mm = Month(Now())
    Select Case mm
        Case 1
            segno = "CAPRICORNO"
            If gg > 20 Then segno = "ACQUARIO"
        Case 2
            segno = "ACQUARIO"
            If gg > 19 Then segno = "PESCI"
        Case 3
            segno = "PESCI"
            If gg > 20 Then segno = "ARIETE"
        Case 4
            segno = "ARIETE"
            If gg > 20 Then segno = "TORO"
        Case 5
            segno = "TORO"
            If gg > 20 Then segno = "GEMELLI"
        Case 6
            segno = "GEMELLI"
            If gg > 21 Then segno = "CANCRO"
        Case 7
            segno = "CANCRO"
            If gg > 22 Then segno = "LEONE"
        Case 8
            segno = "LEONE"
            If gg > 22 Then segno = "VERGINE"
        Case 9
            segno = "VERGINE"
            If gg > 23 Then segno = "BILANCIA"
        Case 10
            segno = "BILANCIA"
            If gg > 22 Then segno = "SCORPIONE"
        Case 11
            segno = "SCORPIONE"
            If gg > 22 Then segno = "SAGITARIO"
        Case 12
            segno = "SAGITARIO"
            If gg > 21 Then segno = "CAPRICORNO"
    End Select
%>
<html>
    <head>
        <title>Mostrare il segno zodiazale del giorno</title>
    </head>
<body>

<h1 align="center">Auguri ai nati sotto il segno: <%=segno%></h1>

</body>
</html>

E' possibile utilizzare delle immagini al posto del testo effettuando poche e semplici modifiche allo script; procuratevi le immagini dei vari segni zodiacali, ad esempio su Google

http://images.google.it/images?q=zodiaco&hl=it

facendo una ricerca generica per zodiaco oppure 12 diverse ricerche per il singolo segno zodiacale; salvate le immagini nella cartella zodiaco come capricorno.gif ecc... Fatto questo dovrete modificare i vari casi della condizione, ad esempio da

Case 1
    segno = "CAPRICORNO"
    If gg > 20 Then segno = "ACQUARIO"

Case 1
    segno = "capricorno.gif"
    If gg > 20 Then segno = "acquario.gif"

e richiamate cosi l'immagine a video

<p align="center"><img src="zodiaco/<%=segno%>"></p>