Ciao a tutti, sto utilizzando la Classe del MITICO Baol74, solo che ho il seguente errore:
codice:
ADODB.Stream error '800a0e79'

Operation is not allowed when the object is open.

/new/admin/upload.asp, line 789
La linea in questione è:

codice:
				Stream.Type = Files("StreamType")
			>>>     Stream.Open
				Stream.Write Files("Content")
All'interno della Sub Modules_Save.

I file da uppare sono così richiamati:
codice:
		Dim oUpload
		Dim NomeFoto
		Set oUpload= new cUpload
		With oUpload
		.AutoRename = False
		.Overwrite = True
		.SetPath "\public\"
		.Load
		.UploadOnly "Images"
		.Movefirst
		i=numero
		While Not .Eof
			if trim(.GetFileName)="" then
				'End With
				Set oUpload = Nothing		
				Session("Loggato")="SI"
				Session("Procedura")="inserisci_err2"
				response.redirect("inc_soci.asp?id=1")		
			end if
			NomeFoto="/public/" & replace(nome," ","_") & "_" & i & right(.GetFileName(),4)
			if numero=i then
				NomeFoto=prev(NomeFoto)
			end if
			if numero=i+1 then
				foto=NomeFoto
			end if
		
			.SaveAs NomeFoto
			.Save
			.MoveNext
			i=i+1
		Wend
	End With
Spero che qualcuno possa darmi una mano perchè è una settimana che sto impazzendo con questo errore ...
Grazie in anticipo.