Rinominare file a seguito di upload su server

[wegawhite]

Ciao, sto cercando con scarso successo di rinominare un file dopo l'upload sul server; utilizzo il codice sottoriportato che restituisce quest'errore:

Microsoft VBScript runtime error '800a0046'

Permission denied

/public/index_sql.asp, line 107

Sono su aruba e la cartella public ha tutti i permessi previsti per questo tipo di operazione, ma l'errore è persistente:

test = (server.mapPath("UploadFolder/" & Form("File1").FileName)) 
    response.write test & "
"
    
    Set gFS = CreateObject("Scripting.FileSystemObject")
        if gFS.FileExists (server.mapPath("UploadFolder/" & Form("File1").FileName)) then
        Do
			Counter = Counter + 1
			NewFileName = Form("File1").FileName
			NewFileName = Counter & "-" & NewFileName  
			
			response.write NewFileName & "
"
			
			x = (server.mapPath("UploadFolder/" & Form("File1").FileName))
			y = (server.mapPath("UploadFolder/"& NewFileName &""))

			response.write x & "
"
			response.write y & "
"

			
           Loop while gFS.FileExists (server.mapPath("UploadFolder/"& NewFileName &""))
            gFS.MoveFile (server.mapPath("UploadFolder/" & Form("File1").FileName)),(server.mapPath("UploadFolder/"& NewFileName &""))
  set gFS = nothing
      end if

I response.write restituiscono:

D:\Inetpub\webs\miositocom\public\UploadFolder\tes t.xls
1-test.xls
D:\Inetpub\webs\miositocom\public\UploadFolder\tes t.xls
D:\Inetpub\webs\miositocom\public\UploadFolder\1-test.xls

Dove sbaglio?

[salvod]

quale sarebbe la riga 107??

[wegawhite]

gFS.MoveFile (server.mapPath("UploadFolder/" & Form("File1").FileName)),(server.mapPath("UploadFolder/"& NewFileName &""))

[salvod]

ke sarebbe questa "\UploadFolder\" e che se n nsbaglio nn sta sotto public..

[wegawhite]

Come no?

D:\Inetpub\webs\miositocom\public\UploadFolder\tes t.xls
D:\Inetpub\webs\miositocom\public\UploadFolder\tes t.xls
D:\Inetpub\webs\miositocom\public\UploadFolder\1-test.xls
D:\Inetpub\webs\miositocom\public\UploadFolder\tes t.xls

[salvod]

fammi capire, ma UploadFolder è un alias che qui nella discussione dai a D:\Inetpub\webs\miositocom\public\Upload ??

[wegawhite]

ti ringrazio ma ho già risolto... cmq non era nessun alias è l'editor del forum che manda a capo le stringhe quando non dovrebbe:

D:\Inetpub\webs\miositocom\public\UploadFolder\test.xls