Ciao ragazzi,
come da oggetto cercavo di risolvere un problema sull'upload immagini.
Sto editando una pagina del software open source MWOPEN per fare inmodo che quando faccio un upload di una immagine che giàò esiste sul server non mi dia errore.
Ho provato a verificare la condizione del fileexists inquesto modo, ma continua a non andare:


if NomeFile<>"" then
Set FSO = CreateObject("Scripting.FileSystemObject")
Upload2 = True
DimensioneFile2 = len(ContenutoFile)
if len(w_GFoto)=0 then
NomeFile2 = NomeFile
w_GFoto = NomeFile
else
NomeFile2 = w_GFoto
end if
if DimensioneFile2 > maxdimg then
Errore = Errore & "Dimensione immagine grande ("&DimensioneFile2*0.001 & " kb) maggiore del limite consentito ("&maxdimg*0.001 & " kb)
"
else
EstensioneFile2 = LCase(right(NomeFile,4))
if EstensioneFile2 <>".jpg" and EstensioneFile2 <>".gif" then
Errore = Errore & "Tipo di file non corretto : "&EstensioneFile2&"
"
else
ArrayNome(1) = Split(NomeFile2, "/")
SoloNome = ArrayNome(1)

if (FSO.FileExists(server.MapPath(percorso & SoloNome)))then
Errore = Errore & "File già esistente sul server" else
Set textStream = FSO.CreateTextFile(server.mappath(percorso & NomeFile2), True, False)
textStream.Write ContenutoFile
textStream.Close
Set textStream = Nothing
end if
end if
end if
Set FSO = Nothing
end if
end if


Ho messo in grassetto la parte aggiunta da me.
Riuscita ad aiutarmi per capire come aggiustare?
Grazie a tutti