Con questo script:
<%
Dim objFSO
'Creo l'istanza dell'oggetto
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Sposto la cartella
objFSO.MoveFolder "c:cartOrigine", "c:cartDestinazione"
Set objFSO = Nothing
%>
sarà possibile spostare una directory sul server scegliendone il nuovo nome