loFSO = CREATEOBJECT("Scripting.FileSystemObject") loFolder = loFSO.getFolder(lcPathOfFolderToBeRenamed) loFolder.Name = lcNewFolderNameWithoutPath