批处理和C# 搜索文件和目录，复制文件和目录源代码，改天加个界面

Cool_Breeze

我在别处一个论坛上面回答一个网友的问题！个人感觉不错！在此分享给大家！

以下是问题描述：

现有：file.txt一个，里面有1000多个换行的文件名（有些有后缀，有些没，有些是文件夹）

根据这个txt里面列出来的文件名，到另一个文件夹a里（含下面所有级别的子文件夹）去依次检索文件名或文件夹名。

检索出来的文件/文件夹按照a文件夹下面的原有路径放到（复制）另一个指定文件夹b，注意b现在还是个空文件夹。

未找到的文件名输出到另一个"未找到.txt"文件里。

示例：

file.txt里面内容：
0007cebt
a400cebt
千岛湖3月拍摄.jpg
2016-5-7


需要进行的操作：
找到：a\ccbbt\2017\vae\0007cebt.pdf
放到：b\ccbbt\2017\vae\里面

未找到：a400cebt
将内容 "a400cebt" 写入"未找到.txt"里面

找到：a\照片\千岛湖3月拍摄.jpg
放到：b\照片\里面

找到：a\2016\2016-5-7（文件夹）
整个文件夹放到：b\2016里面

最后询问是否删除所有原路径下已经被复制的文件和文件夹


脚本文件必须要放在源目录盘符下。

批处理源代码

[Bash shell] 纯文本查看 复制代码

?

001 002 003 004 005 006 007 008 009 010 011 012 013 014 015 016 017 018 019 020 021 022 023 024 025 026 027 028 029 030 031 032 033 034 035 036 037 038 039 040 041 042 043 044 045 046 047 048 049 050 051 052 053 054 055 056 057 058 059 060 061 062 063 064 065 066 067 068 069 070 071 072 073 074 075 076 077 078 079 080 081 082 083 084 085 086 087 088 089 090 091 092 093 094 095 096 097 098 099 100 101 102

@echo off title By Author GIN 2021/05/25 SETLOCAL ENABLEDELAYEDEXPANSION   set souceFile=files.txt set targetDir=d:\gin\c# set notFoundFileName=未找到.txt   set newDirectory=%cd%\newDirectory if not exist %newDirectory% (md "%newDirectory%") REM 源路径为：d:\gin\c# REM 新路径为：D:\GIN\copyFile\newDirectory echo 源路径为：%targetDir% echo 新路径为：%newDirectory%   call :equalTotalChar "%targetDir%" "%newDirectory%" set equalCharTotal=!errorlevel! call :readFileList "%souceFile%" call :getTargetinfo "%targetDir%" call :matchTarget call :deleteSourceFile   pause & exit   REM 计算顶部路径相同部分 :equalTotalChar     set sourcePath=%~1     set newPath=%~2     for /l %%i in (0,1,255) do (         if /i "!sourcePath:~%%i,1!" neq "!newPath:~%%i,1!" (             if /i "!sourcePath:~%%i,1!" equ "\" (exit /b %%i) else (                 for /l %%b in (%%i,-1,0) do (                     if "!sourcePath:~%%b,1!" equ "\" (exit /b %%b)                 )             )         )     )     exit /b 0   REM 读取文件列表 :readFileList     set fileName=%1     set /a sourceFileLines = 0     for /f "tokens=*" %%L in ('type %fileName%') do (set /a sourceFileLines+=1 & set "source_!sourceFileLines!=%%L")     exit /b   REM 获取目标目录信息 :getTargetinfo     set targetDirectory=%1     set /a targetNumber=0     for /f "tokens=*" %%u in ('dir /b /s %targetDirectory%') do (set /a targetNumber+=1 & set "target_!targetNumber!=%%u")     exit /b       REM 匹配目标 :matchTarget     echo 数据源数量为：%sourceFileLines%     set /a deleteNumber=0     echo %date% %time% >> %notFoundFileName%     for /l %%s in (1,1,%sourceFileLines%) do (         echo 正在处理第 %%s 个，!source_%%s!         set found=false         for /l %%t in (1,1,%targetNumber%) do (             call :getFileOrDirectoryName "!source_%%s!" "!target_%%t!" & set matchResult=!errorlevel!             if !matchResult! equ 1 (                 set found=true                 set "tempNewDirOrFile=%newDirectory%!target_%%t:~%equalCharTotal%!"                 pushd "!target_%%t!" && popd & (                     if not exist "!tempNewDirOrFile!" (                         md "!tempNewDirOrFile!" && xcopy /e /y "!target_%%t!" "!tempNewDirOrFile!"                     )                 ) || (                     if exist "!tempNewDirOrFile!" (                         echo f | xcopy /y "!target_%%t!" "!tempNewDirOrFile!"                     ) else (                         echo f | xcopy "!target_%%t!" "!tempNewDirOrFile!"                     )                 )                 set /a deleteNumber+=1 & set "deleteSourceFileOrDirectory_!deleteNumber!=!target_%%t!"             ) 1>nul 2>nul         )         if "!found!" equ "false" (             echo !source_%%s! >> %notFoundFileName%         )     )     exit /b   REM 匹配 目标判断 :getFileOrDirectoryName     set "souce=%1"     set "target=%~nx2"     if %souce% == "%target%" (exit /b 1)     exit /b 0   REM 删除源文件 :deleteSourceFile     echo 是否删除所有原路径下已经被复制的文件和文件夹？     echo 输入 Y 是，N 否：     choice     set input=%errorlevel%     if %input% neq 1 (exit /b)     for /l %%n in (1,1,!deleteNumber!) do (del /p /s !deleteSourceFileOrDirectory_%%n!)     exit /b

C# 源代码

[C#] 纯文本查看 复制代码

?

001 002 003 004 005 006 007 008 009 010 011 012 013 014 015 016 017 018 019 020 021 022 023 024 025 026 027 028 029 030 031 032 033 034 035 036 037 038 039 040 041 042 043 044 045 046 047 048 049 050 051 052 053 054 055 056 057 058 059 060 061 062 063 064 065 066 067 068 069 070 071 072 073 074 075 076 077 078 079 080 081 082 083 084 085 086 087 088 089 090 091 092 093 094 095 096 097 098 099 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153

using System; using System.IO; using System.Collections.Generic; using System.Threading.Tasks;   class Program {     static void Main()     {         string sourceFile = "files.txt";         string targetPath = @"d:\gin\c#";         string newDirectory = @"d:\gin\NewDirectory";         string[] SourceFileContent = File.ReadAllLines(sourceFile, System.Text.Encoding.Default);                   List<string> TargetAllDir;         List<string> TargetAllDirName = GetFileName(Directory.EnumerateDirectories(targetPath, "*", SearchOption.AllDirectories), out TargetAllDir);                   List<string> TargetAllFile;         List<string> TargetAllFileName = GetFileName(Directory.EnumerateFiles(targetPath, "*", SearchOption.AllDirectories), out TargetAllFile);                   List<int> res;         bool found = false;         foreach (string source in SourceFileContent)         {             found = false;             // 复制目录（树）             res = FindDirAndFileName(source, TargetAllDirName);             if (res.Count > 0)             {                 found = true;                 foreach (int index in res)                 {                                           // 复制目录结构                     string newTargetDir = PathReplace(TargetAllDir[index], newDirectory);                     if (!Directory.Exists(newTargetDir))                     {                         Directory.CreateDirectory(newTargetDir);                     }                                           foreach (string subDir in Directory.EnumerateDirectories(TargetAllDir[index], "*", SearchOption.AllDirectories))                     {                         string newSubDir = PathReplace(subDir, newDirectory);                         if (!Directory.Exists(newSubDir))                         {                             Directory.CreateDirectory(newSubDir);                         }                     }                                           // 复制文件                     foreach (string subFile in Directory.EnumerateFiles(TargetAllDir[index], "*", SearchOption.AllDirectories))                     {                         File.Copy(subFile, PathReplace(subFile, newDirectory), true);                     }                 }             }                           // Console.WriteLine(1);             // 复制文件             res = FindDirAndFileName(source, TargetAllFileName);             if (res.Count > 0)             {                 found = true;                 foreach (int index in res)                 {                     string newFileFullName = PathReplace(TargetAllFile[index], newDirectory);                     string newFileFullDir = Path.GetDirectoryName(newFileFullName);                     if (!Directory.Exists(newFileFullDir))                     {                         Directory.CreateDirectory(newFileFullDir);                     }                     File.Copy(TargetAllFile[index], newFileFullName, true);                 }             }                           if (!found)             {                 Console.WriteLine("{0} 未找到！", source);             }         }               }           // 扫描目标目录文件目录结构     static List<string> GetFileName(IEnumerable<string> Data, out List<string> ToTList)     {         List<string> FileName = new List<string>();         ToTList = new List<string>();         foreach (var dir in Data)         {             FileName.Add(Path.GetFileName(dir));             ToTList.Add(dir);         }         return FileName;     }           // 查找文件或者目录     static List<int> FindDirAndFileName(string source, List<string> Target)     {         List<int> result = new List<int>();         int index = Target.IndexOf(source);         if (index == -1) return result;         result.Add(index);         while (true)         {            index = Target.IndexOf(source, index + 1);            if (index != -1)            {                result.Add(index);            }            else            {                break;            }         }         return result;     }           // 路径替换     static string PathReplace(string source, string newDirectory)     {         string newPath ;         // 判断是否在一个盘符下面         if (Path.GetPathRoot(source).ToUpper() == Path.GetPathRoot(newDirectory).ToUpper())         {             int index = 0;             while (index < newDirectory.Length)             {                 if (char.ToUpper(source[index]) == char.ToUpper(newDirectory[index]))                 {                     index++;                 }                 else                 {                     break;                 }             }             while (true)             {                 if (source[--index] == '\\')                 {                     newPath = Path.Combine(newDirectory, source.Substring(index + 1));                     break;                 }             }         }         else         {             newPath = Path.Combine(newDirectory, source.Substring(3));         }         return newPath;     } }

Cool_Breeze

QQending 发表于 2021-5-28 14:30
对的，打包exe，主要是包太大了

不过说实话，本人，一方面批处理写的少，不光对语法，对换行也不熟练 ...

https://docs.microsoft.com/zh-cn ... ndows-commands/echo

本路人

Cool_Breeze 发表于 2021-5-28 13:57
python处理起来更方便！

python自用自然好，但如果给别人尤其是电脑小白使用还要打包exe啊，不然别人没有python环境的用不了

本路人

不错，谢谢分享。虽然我自己是用py脚本去做的，没有批处理可以直接发给别人就能使用了这样方便

as614001

记得缺点好像是 不能中文路径

sutramusic

多谢楼主分享！

newease

感谢楼主分享,有空试试,加分致谢

泡泡汽水

真不错 解决了大量文件复制粘贴的事情了

Cool_Breeze

as614001 发表于 2021-5-28 13:38
记得缺点好像是 不能中文路径

合法的路径应该是可以的。但是没有测试过。

Cool_Breeze

本路人 发表于 2021-5-28 13:37
不错，谢谢分享。虽然我自己是用py脚本去做的，没有批处理可以直接发给别人就能使用了这样方便

python处理起来更方便！

a945882813

学习了！