rinominare immagine

[ganryu]

Ragazzi ho cercato un casino e ho trovato moltisimo. Tuttavia non riesco a far funzionare un accidentaccio. Devo far rinominare una immagine, vi posto il codice:

FileName = Server.MapPath (old_img)
FileName = Replace(FileName,"/","\")

Path = Mid(FileName,1,InStrRev(FileName,"\"))
Path = Path & new_img

Set Fso = Server.CreateObject("Scripting.FileSystemObject")

if(Fso.FileExists(FileName) = true) then
Fso.MoveFile filename, path
end if

Set Fso = Nothing

mi dice che è impossibile eseguire ilmetodo Server.CreateObject.


Mi sapreste aiutare?????

GRazie mille

[Roby_72]

L'immagine deve essere in una cartella con i permessi di scrittura.

Roby