Renomear pasta na máquina remota

Question

Preciso renomear a pasta especificada em máquinas remotas, pois todas as máquinas contêm a mesma pasta no mesmo caminho, e precisamos renomear esta pasta. Ex: D:\TestparaD:\Test2

Preciso de um script para obter o nome das máquinas remotas do arquivo txt e renomear a pasta na unidade D. arquivo bat ou script de shell de energia.

Answer 1

strComputer = "hostname"

strFolderName = "\\"& strComputer &"\C$\Data"

Set objFSO = CreateObject("Scripting.FileSystemObject")

If objFSO.FolderExists(strFolderName) Then
    Set objFolder = objFSO.GetFolder(strFolderName)
    strNewName = objFolder.Name & ".old"
    objFolder.Name = strNewName
End If