Ciao a tutti...

ho un probelma logico riguardo l'elenco di tutte le settimane dell'anno


dovrei ottenre uan cosa del genere:

MAGGIO GIUGNO
3 7
10 14
17 21
24 28
31


OVVERO OTTENERE TUTTI I SABATI DI OGNI MESE

per 11 mesi dell'anno.

Nel codice seguente qualcosa non va..
dove sbaglio ?


codice:
<%
data_fix = date()
num_data = weekday(date())
num_agg = 7 - num_data 
data_inizio = dateadd("d",num_agg,date())
data_fine = dateadd("m",11,data_inizio)

%>
<style>
#head
{
background-color:#FFFFCC;
border:1px solid:#f2f2f2;
text-align:center;
 }
 #main
{
background-color:#f4f4f4;
font-weight:bold;
 }
</style>
<table border="0" width="100%" style="font-size: 0.9em; border-collapse:collapse" cellpadding="0" id="main">
<tr>
<%
for i= data_inizio to data_fine step 31 
%>
<td>
<table border="0" width="100%" style="border-collapse:collapse" cellpadding="0">
	<tr>
		<td id="head" ><%=UCASE(monthname(month(i)))%></td>
	</tr>
	<tr>
		<td align=center>
		<%
		for z = i to dateadd("d",21, i) step 7
		if day(z) < 10 then
		gg = "0"& day(z)
		else
		gg = day(z)
		end if

		x = z & "|" & dateadd("d",7,z)
		
		response.write gg  & " <input type='checkbox' name='data' value='"&x&"'>
"
		response.write "<input type='text' size=4 >
"
		next
		%>
		</td>
	</tr>
</table>
</td>

<%
next
%>
	</tr>
	</table>