Board logo

标题: [文件操作] 需要批量将五级文件夹(包含子文件夹和文件)移动到二级文件夹 [打印本页]

作者: sykjwh    时间: 2019-1-13 12:18     标题: 需要批量将五级文件夹(包含子文件夹和文件)移动到二级文件夹

如图所示,请高手帮忙
作者: yhcfsr    时间: 2019-1-13 12:31

好吧.刚改的.如果有问题,看我签名加好友沟通.
  1. @set @n=0/*&echo off
  2. dir /a-d/s/b *.XLS *.JPG *.DXF|cscript -nologo -E:jscript "%~f0"
  3. pause&exit */
  4.   
  5. var fso=new ActiveXObject('scripting.FileSystemObject');
  6.    
  7. while(!WSH.StdIn.AtEndOfStream)
  8. {
  9.     path=WSH.StdIn.ReadLine();
  10.     var count=0
  11.     path.replace(/\\/g, function(){count++;});
  12.     if(count<5) continue;
  13.   
  14.     var NewPath=path.replace(/^(\w:\\[^\\]*).*\\([^\\]*)\\[^\\]*$/g,'$1\\$2\\')
  15.     if(!fso.FolderExists(NewPath)) fso.CreateFolder(NewPath);
  16.     fso.MoveFile(path, NewPath);
  17. }
复制代码

作者: sykjwh    时间: 2019-1-13 13:08

回复 2# yhcfsr


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




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2