Con questo script visualizzeremo l'intera settimana (da Lunedì a Domenica) partendo da una data specificata:
<% Sub Settimana(data) array_giorni = Split("vuoto, Domenica, Lunedì, Martedì, Mercoledì, Giovedì, Venerdì, Sabato", ", ") oggi = WeekDay(data) inizio_settimana =DateAdd("d", 2-oggi, data) For i = 0 to 6 giorno = DateAdd("d", i, inizio_settimana) response.write array_giorni(Weekday(giorno)) & " " & giorno & "<br>" Next End Sub Session.LCID = 1040 call Settimana (DateSerial(2001, 11, 07)) %>
E' molto utile per creare un piccolo calendario, magari collegato ad un database
Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
Approfondimenti
Nessuna risorsa collegata
I più letti di oggi
- Sfruttare le funzionalità degli Azure Cognitive Service on-edge con i container
- Configurare il nome della run di un workflow di GitHub in base al contesto di esecuzione
- I tutorials, percorsi guidati per tutti
- Introduzione ai Cognitive Services di Microsoft Azure
- Gestire gli eventi dei servizi Azure mediante Event Grid