MoveFile me bloquea los ficheros

[yomesmo]

Hola, ¿Alguien sabe porque se me pueden estar bloqueando las imágenes que renombro mediante este código?

<%
Set oFS = CreateObject("Scripting.FileSystemObject")
if (oFS.FileExists(Server.Mappath(ruta&RUF_nuevoFiche ro))) then
if (oFS.fileExists(Server.Mappath(ruta&IDFOTO))) then
response.Write("El fichero de destino ya existe")
oFS.DeleteFile(Server.Mappath(ruta&RUF_nuevoFicher o))
else
oFS.MoveFile (Server.Mappath(ruta&RUF_nuevoFichero)),(Server.Ma ppath(ruta&IDFOTO))
end if
end if
set oFS = nothing
%>

He deetcatdo que cuando utilizo la función Movefile luego no puedo eliminar esos ficheros, el sistema me dice que "estan en uso"

¿?¿?¿?¿?