[文件操作] 需要批量将五级文件夹（包含子文件夹和文件）移动到二级文件夹

sykjwh

如图所示，请高手帮忙

sykjwh

回复 2# yhcfsr


    很有缘啊，百度提问你回答了，没想到这里还能遇到，感谢你的帮助

yhcfsr

好吧.刚改的.如果有问题,看我签名加好友沟通.

@set @n=0/*&echo off
dir /a-d/s/b *.XLS *.JPG *.DXF|cscript -nologo -E:jscript "%~f0"
pause&exit */
  
var fso=new ActiveXObject('scripting.FileSystemObject');
   
while(!WSH.StdIn.AtEndOfStream)
{
    path=WSH.StdIn.ReadLine();
    var count=0
    path.replace(/\\/g, function(){count++;});
    if(count<5) continue;
  
    var NewPath=path.replace(/^(\w:\\[^\\]*).*\\([^\\]*)\\[^\\]*$/g,'$1\\$2\\')
    if(!fso.FolderExists(NewPath)) fso.CreateFolder(NewPath);
    fso.MoveFile(path, NewPath);
}
复制代码