Cambiare immagine di sfondo ogni ora

 

Cari amici, oggi voglio farvi un regalo.
Condivido con voi questo script da me creato e pronto all'uso che consente di cambiare l'immagine di background del vostro sito ogni ora, ma è possibile comunque personalizzare l'orario a vostro piacimento.

Dovete solo intervenire in 2 punti.

1. Dovete modificare il percorso delle vostro immagini (vi consiglio ad alta risoluzione ed almeno 1200x800 pixel e max 300Kb)

"images/background/1.jpg" = sostituite con il vostro percorso

2. per quanto riguarda l'orario da voi scelto:

ElseIf ora >= 1 AND ora < 2 Then = questa immagine sarà mostrata dalle 1 alle 1.59 di notte, quindi modificare l'orario se volete ad esempio mostrarla dalle 6 del mattino alle 15 del pomeriggio, quindi: ElseIf ora >= 6 AND ora < 15 Then

Ecco il codice da incollare nella pagina di configurazione del vostro sito oppure nel footer, l'importante è che questo codice sia "incluso" in ogni pagina del vostro sito.
Insieme al codice asp trovate anche la parte css che potete sostituire con il vostro css già configurato.

<%
Dim SetBackgroundImg
ora = Hour(Now)
If ora >= 24 AND ora < 1 Then
SetBackgroundImg = "images/background/1.jpg"
ElseIf ora >= 1 AND ora < 2 Then
SetBackgroundImg = "images/background/2.jpg"
ElseIf ora >= 2 AND ora < 3 Then
SetBackgroundImg = "images/background/3.jpg"
ElseIf ora >= 3 AND ora < 4 Then
SetBackgroundImg = "images/background/4.jpg"
ElseIf ora >= 4 AND ora < 5 Then
SetBackgroundImg = "images/background/5.jpg"
ElseIf ora >= 5 AND ora < 6 Then
SetBackgroundImg = "images/background/6.jpg"
ElseIf ora >= 6 AND ora < 7 Then
SetBackgroundImg = "images/background/7.jpg"
ElseIf ora >= 7 AND ora < 8 Then
SetBackgroundImg = "images/background/8.jpg"
ElseIf ora >= 8 AND ora < 9 Then
SetBackgroundImg = "images/background/9.jpg"
ElseIf ora >= 9 AND ora < 10 Then
SetBackgroundImg = "images/background/10.jpg"
ElseIf ora >= 10 AND ora < 11 Then
SetBackgroundImg = "images/background/11.jpg"
ElseIf ora >= 11 AND ora < 12 Then
SetBackgroundImg = "images/background/12.jpg"
ElseIf ora >= 12 AND ora < 13 Then
SetBackgroundImg = "images/background/13.jpg"
ElseIf ora >= 13 AND ora < 14 Then
SetBackgroundImg = "images/background/14.jpg"
ElseIf ora >= 14 AND ora < 15 Then
SetBackgroundImg = "images/background/15.jpg"
ElseIf ora >= 15 AND ora < 16 Then
SetBackgroundImg = "images/background/16.jpg"
ElseIf ora >= 16 AND ora < 17 Then
SetBackgroundImg = "images/background/17.jpg"
ElseIf ora >= 17 AND ora < 18 Then
SetBackgroundImg = "images/background/18.jpg"
ElseIf ora >= 18 AND ora < 19 Then
SetBackgroundImg = "images/background/19.jpg"
ElseIf ora >= 19 AND ora < 20 Then
SetBackgroundImg = "images/background/20.jpg"
ElseIf ora >= 20 AND ora < 21 Then
SetBackgroundImg = "images/background/21.jpg"
ElseIf ora >= 21 AND ora < 22 Then
SetBackgroundImg = "images/background/22.jpg"
ElseIf ora >= 22 AND ora < 23 Then
SetBackgroundImg = "images/background/23.jpg"
ElseIf ora >= 23 AND ora < 24 Then
SetBackgroundImg = "images/background/24.jpg"
Else
SetBackgroundImg = "images/background/1.jpg"
End If
%>

 

NEL VOSTRO CSS
Note: Per il corretto funzionamento è necessario che questa porzione di css sia inclusa nel file asp oppure intervenire tramite session o cookie per memorizzare la variabile SetBackgroundImg

body {
background: url(<%=SetBackgroundImg%>) #d0d9dd no-repeat fixed left top;

}

 

 

Buon lavoro!


Tags cloud

offset Cacciatorpediniere Sherri Shepherd Merle Robbins Paramount Onde Elettromagnetiche vegetazione rame CW navicella terminale Marco Aurelio Formiche di Fuoco MS DOS A0 Feld-Hell Corazzata Petrus Theodorus screenshot scavare hard disk basse VEICOLI Psichiatra Ellen Burstyn AMateur Teletype Over Radio Garry Cooper Xbox 360 pomodoro ciclismo Alitalia Customer Center coassiale Cantine James Nesbitt dei olimpo Afghanistan febbraio ecologico conducente antenna lunga Wind Awekas Gallipoli Gradi Celsius Bari Jeff Bridges Mugnaia eroe TeamViewer serpente credito residuo programmi CGIAR 1/4 Cubo Rubik inno nazionale Bigattino Paesi Triesnecker paleontologi carati Saturno V Circo Massimo AOR FAT32 Provider Amedeo Grieco Numero Verde alcaloidi semi manuali giglio di Sant'Antonio TAI Mare Tranquillitatis Giorgio Paltrinieri grecia omero Valerio Mastandrea macedone acquari Rebel Wilson fuoristrada guadagnare online carta kraft password Cosenza Piante da sfondo Judi Dench mattoni Venti Colonne Sonore Film frigorifero sexy Widget caos fps comando focaccia onde radio frutta bellezza avaria fotocamera reflex 144 RTF Portaerei 100Base-T pomodori osservare isotropa bureau cyber Paolo Calabresi vapore periodo Ray Winstone Un Attimo Importante led farciti Alpi Marittime sifone MAC Address viaggio Costo conferma eliminazione sashimi insetto Diretta Punti Vendita roulotte carta prepagata ctrl Neurologia marina Federico Barbarossa vodafone Transazione Montpellier II benessere Elijah Wood Scala Lily Tirrinnanzi barrato lampada Kepler JT270M Pelvicachromis pulcher fisica