[baol74] upload path completa

[Cesar]

Originariamente inviato da weppos
Sicuro? :master:
HAi controllato gli esempi?

si... ho cercato dappertutto... -.-

il mio codice e così:

<%
Dim oUpload, img
Set oUpload= new cUpload
With oUpload
.EnabledAspUpload = False
.EnabledImageSize = TRUE
.EnabledLog = False
.AutoRename = True
.Overwrite = False
.SetPath "..\..\public\prova"
.Load
.UploadOnly "Images"
While Not .Eof
If .Files("Height")>=66 or .Files("Width")>=66 then
 Response.write ("Le dimensioni dell'immagine " &_
 .GetFileName() &" non sono corrette (" &_
 .Files("Height") &"x" & .Files("Width") &"): File non caricato
"  )
else
 img = oUpload.GetFileName() 'ho provato anche .GetFileName()
 Response.Write img
 .Save
end if
.MoveNext
Wend
End With
Set oUpload = Nothing
%>

[Cesar]

ho letto in questo post http://forum.html.it/forum/showthrea...hreadid=666405

e a questa persona gli funziona oUpload.GetFileName().
A me no!

[weppos]

Versione della classe?

[Cesar]

3.1.2

ma il codice e giusto ?

[salvodibella]

Ciao!
vedi se riesci a risolvere con questo:

NomeFile = oUpload.GetFileName()

mettilo nel file: save.asp!

[Cesar]

Originariamente inviato da salvodibella
Ciao!
vedi se riesci a risolvere con questo:

NomeFile = oUpload.GetFileName()

mettilo nel file: save.asp!

ma non e la stessa cosa che ho fatto io ? :master:

[salvodibella]

Hai ragione, ma nel mio file save.asp è così:

<%
Dim oUpload
Set oUpload = new cUpload
	oUpload.SetPath "public\images" 'Impostazione percorso salvataggio  
	oUpload.Load
	oUpload.UploadOnly "Images" 'Consente il caricamento di sole immagini
	While Not oUpload.EOF
		oUpload.Save
		If oUpload.Files("ErrorNumber")<>0 then
			Response.Write "Si è verificato un errore nel salvataggio del file " & oUpload.GetFileName() & "
"
		Else
			Response.Write "Il file " & oUpload.GetFileName() & " è stato salvato 
"
		End if
		oUpload.MoveNext	
	Wend	
oUpload.Save()
Set oUpload=Nothing

Ti assicuro che funziona!
mi restituisce il nome del file modificato se esiste!

[salvodibella]

perchè non provi ad usare oUpload.XXXXX in tutte le voci???

[weppos]

La regola è questa.
nomeoggetti.metodo oppure nomeoggetto.funzione.

Se però si include il costrutto with allora tutte le istruzioni all'interno non encessitano di riportare il nome oggetto espresso nel with poichè diventa implicito.

[Cesar]

Originariamente inviato da salvodibella
Hai ragione, ma nel mio file save.asp è così:

<%
Dim oUpload
Set oUpload = new cUpload
	oUpload.SetPath "public\images" 'Impostazione percorso salvataggio  
	oUpload.Load
	oUpload.UploadOnly "Images" 'Consente il caricamento di sole immagini
	While Not oUpload.EOF
		oUpload.Save
		If oUpload.Files("ErrorNumber")<>0 then
			Response.Write "Si è verificato un errore nel salvataggio del file " & oUpload.GetFileName() & "
"
		Else
			Response.Write "Il file " & oUpload.GetFileName() & " è stato salvato 
"
		End if
		oUpload.MoveNext	
	Wend	
oUpload.Save()
Set oUpload=Nothing

Ti assicuro che funziona!
mi restituisce il nome del file modificato se esiste!

molto bene! così funziona!

<%
Dim oUpload
Set oUpload = new cUpload
	oUpload.EnabledAspUpload = False
	oUpload.EnabledImageSize = TRUE
	oUpload.EnabledLog = False
	oUpload.AutoRename = True
	oUpload.Overwrite = False
	oUpload.SetPath "..\..\public\prova" 'Impostazione percorso salvataggio  
	oUpload.Load
	oUpload.UploadOnly "Images" 'Consente il caricamento di sole immagini
	While Not oUpload.EOF
		oUpload.Save
		
		If oUpload.Files("Height")>=66 or oUpload.Files("Width")>=66 then
		Response.write ("Le dimensioni dell'immagine " & oUpload.GetFileName() &" non sono corrette (" & oUpload.Files("Height") &"x" & oUpload.Files("Width") &"): File non caricato
"  )
		else
 		Response.Write(oUpload.GetFileName())
		end if
		oUpload.MoveNext	
	Wend	
oUpload.Save()
Set oUpload=Nothing
%>