dov è l'errore in questo ciclo con array??

[alexinside83]

ciao a tutti...
ho il seguente ciclo che mi continua a dare errore:

array_foto=array(4)
for j=0 to 3
response.Write(j)
if recset("foto"&j+1)<>"" AND NOT ISNULL(recset("foto"&j+1)) then
array_foto(j)="SI"
else
array_foto(j)="NO"
 end if
next

mi dice:
Errore di run-time di Microsoft VBScript error '800a0009'

Indice non incluso nell'intervallo: 'j'

(in rosso la riga incriminata)

grazie a tutti

[willybit]

Ciao alexinside83,

sbagli la dichiarazione dell'array

ReDim array_foto(4)

[alexinside83]

grazie milla willybit...
ma perchè in VB bisogna fare il redim???

se io so già le dimensioni perchè devo forzargli il ridimensionamento...???

[willybit]

già perché? :master:
meglio fare

Dim array_foto(4)

cerca di capire... è lunedì

[alexinside83]

e io infatti l'avevo fatto...
ma mi dava lo stesso errore...!!! VVoVe:

[willybit]

tu avevi fatto così

array_foto=array(4)

così crei un array di un elemento solo che è il numero 4