Costruire griglia calendario intero anno

**peppeweb** · 02-01-2012, 21:43

Ciao a tutti e Buon Anno !!

ho la necessità di implementare su un sito di gestione alberghiera un calendario per visualizzare le disponibilità di un determinato servizio ....

in rete ho trovato una griglia per rappresentare un'anno intero che mi piacerebbe realizzare:

http://www.livio.net/code/calendar_3...stYearly36.asp

come posso procedere per realizzare una griglia del genere ?
mi date dei suggerimenti ?

**cavicchiandrea** · 03-01-2012, 01:00

Se vuoi proprio quello http://www.livio.net/main/scripts.asp?file_id=31 altrimenti puoi prendere spunti e riadattartelo.

**peppeweb** · 03-01-2012, 07:34

lo script lo avevo già scaricato .... ma non sono riuscito a capirci niente.
A me serviva soltanto riuscire a riprodurre quella griglia !
Potete aiutarmi ?

**cavicchiandrea** · 03-01-2012, 10:32

http://www.planet-source-code.com/vb...=9606&lngWId=4

**peppeweb** · 03-01-2012, 10:46

grazie mille ma ho cercato alla fine di costruirmelo da solo secondo le mie esigenze ....

vi posto il codice ... sicuramente poco pulito ma funzionante

codice:

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Senza nome 1</title>

<style type="text/css">

#CellaNome {
	text-align:center;
	background:#D7D7D7;
	font-family:Arial, Helvetica, sans-serif;
	font-size:xx-small;
	width:20px;
}

#CellaGiorno {
	text-align:center;
	background: #99FFCC;
	font-family:Arial, Helvetica, sans-serif;
	font-size:xx-small;
	border:1px solid #A0D0F8;
}

#CellaGiornoVuota {
	text-align:center;
	background:#F3F3F3;
	font-family:Arial, Helvetica, sans-serif;
	font-size:xx-small;	
}

#CellaMese {
	text-align:center;
	background:#F3F3F3;
	font-family:Arial, Helvetica, sans-serif;
	font-size:xx-small;	
}



</style>

</head>

<body>


<table style="width: 740px">

	<tr>
		<td></td>
		<td id="CellaNome">lu</td>
		<td id="CellaNome">ma</td>
		<td id="CellaNome">me</td>
		<td id="CellaNome">gi</td>
		<td id="CellaNome">ve</td>
		<td id="CellaNome">sa</td>
		<td id="CellaNome">do</td>
		<td id="CellaNome">lu</td>
		<td id="CellaNome">ma</td>
		<td id="CellaNome">me</td>
		<td id="CellaNome">gi</td>
		<td id="CellaNome">ve</td>
		<td id="CellaNome">sa</td>
		<td id="CellaNome">do</td>
		<td id="CellaNome">lu</td>
		<td id="CellaNome">ma</td>
		<td id="CellaNome">me</td>
		<td id="CellaNome">gi</td>
		<td id="CellaNome">ve</td>
		<td id="CellaNome">sa</td>
		<td id="CellaNome">do</td>
		<td id="CellaNome">lu</td>
		<td id="CellaNome">ma</td>
		<td id="CellaNome">me</td>
		<td id="CellaNome">gi</td>
		<td id="CellaNome">ve</td>
		<td id="CellaNome">sa</td>
		<td id="CellaNome">do</td>
		<td id="CellaNome">lu</td>
		<td id="CellaNome">ma</td>
		<td id="CellaNome">me</td>
		<td id="CellaNome">gi</td>
		<td id="CellaNome">ve</td>
		<td id="CellaNome">sa</td>
		<td id="CellaNome">do</td>
		<td id="CellaNome">lu</td>
		<td id="CellaNome">ma</td>		
	</tr>

	
	<%
	
	
	For mm = 1 to 11
	Anno 	= Year(date)
	Mese 	= mm
	DataMM	= "01/"&Mese&"/"&Anno
	DataSS 	= DateAdd("m",1,DataMM)
	MesePP  = MonthName(mm)
	Contag  = DateAdd("d",-1,DataSS)
	Contagg = DatePart("d",Contag)
	
	DataGG	= "01/"&Mese&"/"&Anno
	
	ng 	= Left(WeekDayName(WeekDay(DataGG)),3)
	
	If ng = "lun" Then
	gg	= 0
	ElseIf ng = "mar" Then
	gg	= 1
	ElseIf ng = "mer" Then
	gg	= 2
	ElseIf ng = "gio" Then
	gg	= 3
	ElseIf ng = "ven" Then
	gg	= 4
	ElseIf ng = "sab" Then
	gg	= 5
	ElseIf ng = "dom" Then
	gg	= 6
	End If
	
	cc = 37-(Contagg+gg)	
	%>
	<tr>
		<td id="CellaMese"><%=Left(MesePP,3)%></td>
		
		<% For aa = 1 to gg	%>
		<td id="CellaGiornoVuota"></td>
		<% Next %>

		<% For a = 1 to Contagg	%>
		<td id="CellaGiorno"><%=a%></td>
		<% Next %>
		
		<% For aaa = 1 to cc	%>
		<td id="CellaGiornoVuota"></td>
		<% Next %>

	</tr>
	<% Next %>
	
	<%
	For mm = 12 to 12
	Anno 	= Year(date)
	Mese 	= mm
	DataMM	= "01/"&Mese&"/"&Anno
	DataSS 	= DateAdd("m",1,DataMM)
	MesePP  = MonthName(mm)
	Contag  = DateAdd("d",-1,DataSS)
	Contagg = DatePart("d",Contag)
	
	DataGG	= "01/"&Mese&"/"&Anno
	
	ng 	= Left(WeekDayName(WeekDay(DataGG)),3)
	
	If ng = "lun" Then
	gg	= 0
	ElseIf ng = "mar" Then
	gg	= 1
	ElseIf ng = "mer" Then
	gg	= 2
	ElseIf ng = "gio" Then
	gg	= 3
	ElseIf ng = "ven" Then
	gg	= 4
	ElseIf ng = "sab" Then
	gg	= 5
	ElseIf ng = "dom" Then
	gg	= 6
	End If

	cc = 37-(Contagg+gg)
	%>
	<tr>
		<td id="CellaMese"><%=Left(MesePP,3)%></td>
		
		<% For aa = 1 to gg	%>
		<td id="CellaGiornoVuota"></td>
		<% Next %>

		<% For b = 1 to 31 %>
		<td id="CellaGiorno"><%=b%></td>
		<% Next	%>
		
		<% For aaa = 1 to cc	%>
		<td id="CellaGiornoVuota"></td>
		<% Next %>

	</tr>
	<% Next %>
	
</table>


</body>

</html>

sicuramente esiste un modo più pulito per realizzarlo, ma meglio di niente.

**cavicchiandrea** · 03-01-2012, 11:42

Usa le classi per la formattazione css gli id devono essere univoci

Discussione: Costruire griglia calendario intero anno

Strumenti discussione

Ricerca discussione

Visualizza

Costruire griglia calendario intero anno

Permessi di invio