[已解决]批处理将当前目录下的指定文件夹移动到指定目录？

滴血雄鹰

批处理将当前目录下的指定文件夹移动到指定目录？

E:\0000\1001(文件夹名)\...
...
E:\0000\1400(文件夹名)\...

E:\0000\2001(文件夹名)\...
...
E:\0000\2400(文件夹名)\...

以此类推

另外，E:\0000\下还有其他文件夹和文件。

只将符合条件的1001~1400文件夹及子文件移动到E:\0000\0\下，E:\0000\下还有其他文件夹和文件不处理，如何实现？

miqilaosu

@echo off
title 复制
color 2f
cd /d %~dp0
setlocal enabledelayedexpansion
for /f "delims=*" %%i in ('dir /ad/b/s "*"') do (
set ni=%%~ni
set /a "ni=!ni:~0,4!"
if !ni! LEQ 1400 if !ni! GEQ 1000 (
xcopy /s /e /y "%%i" "F:\0000\0\%%~ni\"
)
)
pause
^^^^^^^^^^^^^^^^^^^^^^^^^
不知道你要的是不是这么复制

滴血雄鹰

回复 2# miqilaosu

复制是对的，但我想要的的是移动，能不能修改下？另外，能不能加上个选项，就是可以输入移动指定的多少个文件夹，加上个输入窗口输入文件夹开始名称：1001，结束名称：1100，例如，我不是要全部移动1001~1400全部文件夹，而且可以选择只移动1001~1100文件夹，1101~1400不移动。
如果目标文件夹中已有移动的文件夹，停止执行，并提示后，按任意健退出。

miqilaosu

@echo off
title 复制
color 2f
cd /d %~dp0
set /p ks=开始：
set /p js=结束：
setlocal enabledelayedexpansion
for /f "delims=*" %%i in ('dir /ad/b/s "*"') do (
set ni=%%~ni
set /a "ni=!ni:~0,4!"
if !ni! GEQ %ks% if !ni! LEQ %js% (
xcopy /s /e /d /y "%%i" "F:\0000\0\%%~ni\" && Rd /s /q "%%i"
)
)
pause
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
最后你说的这个有就停止的没改。你确定是有就停止？而不是有就跳过继续执行？这个是不覆盖已存在文件，如果你想停止需要判断下直接跳出

miqilaosu

@echo off
title 复制
color 2f
cd /d %~dp0
set /p ks=开始：
set /p js=结束：
setlocal enabledelayedexpansion
for /f "delims=*" %%i in ('dir /ad/b/s "*"') do (
set ni=%%~ni
set /a "ni=!ni:~0,4!"
if !ni! GEQ %ks% if !ni! LEQ %js% (
if exist "F:\0000\0\%%~ni\" (
echo,已存在按任意键跳出
pause
exit
) else (

xcopy /s /d /e /y "%%i" "F:\0000\0\%%~ni\" && Rd /s /q "%%i")

)
)
)
pause
……………………………………………………………………………………………………………………
这个是你说的存在停止跳出的那个，但这种复制的文件估计不会完整啊，因为有可能你100个文件复制第二个时就有相同的了，然后跳出后面都不会执行啊

滴血雄鹰

回复 5# miqilaosu


    5楼代码实际效果与4楼代码效果完全一样。不管有没有存在文件，都是复制。在4楼的基础上，能否在执行文件复制前，先检测下E:\0000\0文件夹情况，
有3种情况：
一种情况：
E:\0000\下没有0文件夹。
第2种情况：
E:\0000\存在0文件夹，是空文件夹
第3种情况：
E:\0000\存在0文件夹，不是空文件夹，而是存在子文件夹及文件。

如果是第3种情况，就提示下:"E:\0000\0\存在文件"，按任意键退出，中断下面的执行复制任务。如果不是第3种情况，就执行复制。

miqilaosu

回复 6# 滴血雄鹰


@echo off
title 复制
color 2f
cd /d %~dp0
set /p ks=开始：
set /p js=结束：
setlocal enabledelayedexpansion
for /f "delims=*" %%i in ('dir /ad/b/s "*"') do (
set ni=%%~ni
set /a "ni=!ni:~0,4!"
        if !ni! GEQ %ks% if !ni! LEQ %js% (
                if exist "E:\0000\0\%%~ni\" (
                                dir /ad/b/s "E:\0000\0\%%~ni\" | findstr .*>nul && (
                                echo “文件为空正在复制”
                                xcopy /s /d /e /y "%%i" "E:\0000\0\%%~ni\" && Rd /s /q "%%i"
                                ) || (
                                echo “文件已存在”
                                pause
                                exit
                                )
                )  else (
                xcopy /s /d /e /y "%%i" "E:\0000\0\%%~ni\" && Rd /s /q "%%i"
                )
        ) else (
        echo "没有符合文件"
        )
)
pause
…………………………………………………………………………………………………………………………………………………………………………………………
我试过了这种比如有三个文件夹：1001文件夹,1005文件夹,1008文件夹。比如1005文件夹以E:\000\0\存在文件的话 1008是没有被执行的，因为我也是新人，希望有专业人事帮解答

滴血雄鹰

回复 7# miqilaosu

那这样，E:\0000\下存在0文件夹，不管是空的还是0文件夹下有文件，都提示下:"有0文件夹存在"，按任意键退出，中断下面的执行复制任务。否则，就执行复制。这种方式能实现么？

xczxczxcz

PowerShell 3.0+

1. 
   
2. $list=ls "E:\0000" -dir|?{$_.name -match '^[\d]*$'};
   
3. 
   
4. Function Get-InputNum {
   
5.         write-host "文件夹序号范围：$($list[0]) - $($list[-1])" -fore Red;'';
   
6.         Write-Host '输入序号：用【.,*-+/\=或空格】等分开' -fore Yellow;
   
7.         $enter = $null;
   
8.         $enter = Read-Host -Prompt "输入要移动的文件夹序号";
   
9.         if ( !$enter ) {
   
10.                 cls;Write-Host '输入数字范围' -fore red; Get-InputNum;
    
11.         } else { Return $enter }
    
12. }
    
13. 
    
14. $enter = ((Get-InputNum) -join '').Trim();
    
15. $ref = $enter -split '\.|,|-|\*|\+|=|/|\\|\s+';
    
16. Try {
    
17.         $n1 = $ref[0].Trim() -as [int];
    
18.         $n2 = $ref[1].Trim() -as [int];
    
19. } catch {
    
20.         cls; '文件错误，检查后重新运行，按任意键退出'; Pause; exit;
    
21. }
    
22. $num = @( ($n1..$n2)|%{$_} );
    
23. $folder = @(ls "E:\0000" -dir|?{$_.name -in $num});
    
24. Foreach ( $d in $folder )
    
25. {
    
26.         if ( [io.directory]::Exists("E:\0000\0\$d") ) {
    
27.                 Write-Host "已存在 $d 跳过移动";
    
28.                 Continue;
    
29.         };
    
30.         move "E:\0000\$d" -dest "E:\0000\0" -verb -Force;
    
31. }
    
32. 
    
33. Pause;
    

复制代码

xczxczxcz

其实我上面的脚本有 5 个问题：
一、 TRY{} 内两个赋值语句 没有错误返回值。不会抛异常。
二、 当用户输入一组数字时 没有做异常处理。
三、 $num 赋值有些画蛇添足。 直接 n1..n2 即可。
四、 当n1 大于 n2 时。系统会直接从 n1 截断以 n1为最小值。 所以要加 sort. 或者修改 -in 参数。
五、函数中用了 ''' ，这个空行并不会在控制台显示，而是被返回值吃掉了。

把修改好的再发上来。KAO. 我好象没这么严谨的发过脚本。 powershell 3.0+ 这个可以随意使用了。

1. 
   
2. $list=ls "$pwd\0000" -dir|?{$_.name -match '^[\d]*$'};
   
3. 
   
4. Function Get-InputNum {
   
5.         write-host "文件夹序号范围：$($list[0]) - $($list[-1])`n" -fore Green;
   
6.         Write-Host "输入序号：用【.,*-+/\=或空格】等分开`n" -fore Yellow;
   
7.         $ref = $enter = $null;
   
8.         $enter = Read-Host -Prompt "输入要移动的文件夹序号范围";
   
9. 
   
10.         if ( !$enter ) {
    
11.                 cls;Write-Host '输入数字范围' -fore red; Get-InputNum;
    
12.         }
    
13. 
    
14.         $ref = (-join $enter).Trim() -split '\.|,|-|\*|\+|=|/|\\|\s+';
    
15.         if ( $ref.count -eq 1 ) {
    
16.                 Try {
    
17.                         $n2 = $n1 = [int]$ref.Trim();
    
18.                 } catch {
    
19.                         cls;
    
20.                         Write-Host "文件错误，重新输入`n" -fore red;
    
21.                         Get-InputNum;
    
22.                 }
    
23.                 Return $n1,$n2;
    
24.         }
    
25. 
    
26.         Try {
    
27.                 $n1 = [int]$ref[0].Trim();
    
28.                 $n2 = [int]$ref[1].Trim();
    
29.         } catch {
    
30.                 cls;
    
31.                 Write-Host "文件错误，重新输入`n" -fore red;
    
32.                 Get-InputNum;
    
33.         }
    
34.         Return $n1,$n2;
    
35. }
    
36. 
    
37. $enter = Get-InputNum;
    
38. Clear-Host;
    
39. $num = $enter[0]..$enter[1] | sort;
    
40. $folder = @(ls "$pwd\0000" -dir|?{$_.name -in $num});
    
41. Foreach ( $d in $folder )
    
42. {
    
43.         if ( [io.directory]::Exists("$pwd\0000\0\$d") ) {
    
44.                 Write-Host "已存在 $d 跳过移动";
    
45.                 Continue;
    
46.         };
    
47.         move "$pwd\0000\$d" -dest "$pwd\0000\0" -verb -WhatIf;
    
48. }
    
49. 
    
50. Pause;
    

复制代码

滴血雄鹰

回复 4# miqilaosu


我就用这个代码了，powershell 3.0搞不来，Win7默认不支持，麻烦。

Batcher

回复 11# 滴血雄鹰


    Win7马上停止支持啦，尽快升级到Win10吧