Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

Tema che cambia con le date

Autore Messaggio
kawa

Principiante
Principiante
3 Discussioni



Profilo - kawa
07 novembre 2006 alle 09:06:39 Profilo - kawaInvia un messaggio privato Rispondi quotando
Se a qualcuno puo' interessare ho fatto una piccola modifica molto elementare al file manager-inc.asp: avevo bisogno di far cambiare grafica al tema principale durante certi periodi dell'anno (natale, estate, inverno, etc etc) senza dover stare dietro al calendario per cambiare manualmente.

Allroa ho proceduto cosi':

ho creato altri temi nella cartella themes, del tipo "estate", "natale" e altre. In queste ho messo i temi personalizzati per il periodo scelto, e nel file manager-inc.asp nella routine Sub ReadApplicationFromXML() ho aggiunto il codice, tra le righe
sDefaultTheme = GetNewTranslation("sDefaultTheme", oAppXML, "")

e
if sDefaultTheme = "" then
sDefaultTheme = "default"
end if
.
Questo il codice (mooolto sporco, ma lo devo ancora limare):
Dim Giorno, MeseNow, Festa, dt
dt=Now()
Giorno = day(dt)
MeseNow = month(dt)


select case MeseNow
case 1 : Festa="Gennaio"
If giorno <= 6 Then
sDefaultTheme = "capodanno"
elseif giorno > 6 Then
sDefaultTheme = "inverno"
end if
case 2 : Festa="Febbraio"
sDefaultTheme = "inverno"
case 3 : Festa="Marzo"
If giorno < 21 Then
sDefaultTheme = "inverno"
else
sDefaultTheme = "primavera"
end if
case 4 : Festa="Aprile"
sDefaultTheme = "primavera"
case 5 : Festa="Maggio"
sDefaultTheme = "primavera"
case 6 : Festa="Giugno"
If giorno < 21 Then
sDefaultTheme = "primavera"
else
sDefaultTheme = "estate"
end if
case 7 : Festa="Luglio"
sDefaultTheme = "estate"
case 8 : Festa="Agosto"
sDefaultTheme = "estate"
case 9 : Festa="Settembre"
If giorno < 23 Then
sDefaultTheme = "estate"
else
sDefaultTheme = "autunno"
end if
case 10: Festa="Ottobre"
sDefaultTheme = "autunno"
case 11: Festa="Novembre"
sDefaultTheme = "autunno"
case 12: Festa="Dicembre"
If giorno < 22 Then
sDefaultTheme = "autunno"
elseif giorno >=24 and giorno<= 26 then
sDefaultTheme = "natale"
elseif giorno >= 29 and giorno<= 31 Then
sDefaultTheme = "vigilia"
else
sDefaultTheme = "inverno"
end if
case else
sDefaultTheme = "default"
end select


Ovviamente funziona solo se avete creato tanti temi quanti ne avete indicati nello script.

Fatemi sapere se vi e' utile.
---------------
*** KawaShi ***

Log in

Login
Password
Memorizza i tuoi dati:

Cerca

 

Sostieni AspNuke

Un piccolo gesto per aiutarci a mantenere AspNuke.it online

Promo

MusicWebItalia.it
Video Testi Traduzioni Spot Colonne sonore Accordi e Spartiti gratis.

Visitatori

Visitatori Correnti : 177
Membri : 0 offline Anna

Iscritti

 Utenti: 18940
Ultimo iscritto : glauco
Lista iscritti
Messaggi privati: 3373 Commenti: 2210 Immagini: 39 Downloads: 144 Articoli: 49 Pagine: 101 Siti web: 558 Notizie: 180 Sondaggi: 11 Preferiti: 5684716 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi