un semplice upload ma nn entra nel while

[cicetaar]

ciao questo è il codice che uso per un semplice upload (lo complicherò in futuro) con la classe di baol

solo che durante l'esecuzione della pagina nn entra nel "while" e perciò nn uploadda nulla

vi prego aiutatemi..

salut, simone

<%

Dim oUpload
Set oUpload= new cUpload


With oUpload
.EnabledAspUpload = False
.EnabledImageSize = TRUE
.EnabledLog = False
.AutoRename = True
.Overwrite = False

.Load
.UploadOnly "Images"

While Not .Eof

for i= 1 to cInt(Session("quante_foto"))
If .Files("Height")>=5680 or .Files("Width")>=5660 then
 Response.write ("Le dimensioni dell'immagine " &_
 .GetFileName() &" non sono corrette (" &_
 .Files("Height") &"x" & .Files("Width") &"): File non caricato
"  )
else
	.SetPath "img/birre/big"
	.SaveAs(Session("nome_foto") & i)
end if
.MoveNext
next
Wend
End With
Set oUpload = Nothing
%>