ciclo for non mi restituisce valori fuori dal ciclo...

[scmatteo]

Ragazzi mi spiego:

nCicli		=	0		
vExCD		=	false
vDanceDept	=	false

for iii=0 to ubound(IDFormato)
	if cstr(IDFormato(iii))>=10 AND cstr(IDFormato(iii))<=21 then
		if not vDanceDept then
			nCicli=nCicli+1
			vDanceDept=true
		end if
	end if
	if (cstr(IDFormato(iii))>=1 AND cstr(IDFormato(iii))<=9) OR (cstr(IDFormato(iii))>=22 AND cstr(IDFormato(iii))<=23) then
		if not vExCD then
			nCicli=nCicli+1
			vExCD=true
		end if
	end if
response.Write "cicli:" & nCicli & "
"
next

response.Write "cicli:" & nCicli & "
"
response.end

Tutto funzioan perfettamente ma non riesco a riavere il valore di nCicli, o meglio dentro al ciclo lo vedo, finito il ciclo non mi restituisce niente... come mai?
grazie