VBScript to prompt a folder name

[chadbi]

Hello,

Does anyone have a VBScript that will go to a directory and prompt to rename a folder that already exists?

Example:

I have a folder named "Test1". After I do a file move and deletion, I want to get a prompt that identifies the "Test1" folder and asks for the folder to be renamed.

Thanks in advance for any suggestions.

 

[NWBeaver]

Try something like this:

Set objFSO = CreateObject("Scripting.FileSystemObject")
foldername="C:\FolderA"

If objFSO.FolderExists(foldername) Then
set objFolder = objFSO.GetFolder(foldername)

strNewName = InputBox("Enter the new folder name for: " & objFolder.name)
objFolder.name= strNewName

End If

 

[chadbi]

Worked great! Thanks for the help!