folderspec='c:\foo' >cNewName = 'foobar' > >fso = CreateObject("Scripting.FileSystemObject") >oFolder = fso.GetFolder(folderspec) >oFolder.Name = cNewName