codice:
<%
Dim oUpload

Set oUpload = new cUpload
	oUpload.SetPath "../../dati/public/immobiliare/"
	oUpload.AutoRename=True
	oUpload.OverWrite=False
	oUpload.Upload
	oUpload.Filter = oUpload.FilterImage() & AND_ & oUpload.FilterSize(246000) 
	oUpload.MoveFirst()
	While not oUpload.EOF
		oUpload.Save()
		img_file = oUpload.GetFileName() 
		
		Response.Write "File Salvato : "&img_file & "
"
		oUpload.MoveNext
	Wend
	Set oUpload = Nothing
%>
Se metti il filtro, l'if non è più necessario, adirittura inutile in quanto il filtro cancella tutti i files che non rispettano la condizione.