<%
Dimfso, F, pasta
Setfso = server.createObject ("scripting.filesystemobject")
'Nome do diretório de alterações
SetFolder = fso.getFolder (Server.mappath ("Old")))
FASTER.NAME = "NOVO" 'NOVO NOME
'Altere o nome do arquivo
Setf = fso.getfile (server.mappath ("Old.asp"))
f.Name = "new.asp" 'Novo nome
'liberar
%>