<%
Dimfso, f, carpeta
Setfso = server.createObject ("scripting.filesystemObject")
'Cambiar el nombre del directorio
Setfolder = fso.getfolder (server.mappath ("antiguo"))
carpeta.name = "nuevo" 'nuevo nombre
'Cambiar el nombre del archivo
Setf = fso.getfile (server.mappath ("Old.asp"))
f.name = "new.asp" 'nuevo nombre
'liberar
%>