这是我写的一些代码 :)
@echo off
set source="R:\Contracts\"
set destination="R:\Contracts\Sites\"
ROBOCOPY %source% %destination% *.srt *.pdf *.mp4 *.jpg /COPYALL /R:0 /S
for /r %source in (*) do @copy "%destination" .
R：\Contracts\ 文件夹下有很多包含文件的文件夹。
我想将所有内容复制到 R：\Contracts\Sites\ 并将文件夹结构展平。
所有内容都成功复制，但文件夹结构也一并复制了。
谢谢。
你可以用一行PowerShell代码来实现这个功能。在这个例子中，我从所有子文件夹中筛选出扩展名为.txt的所有文件，然后将它们发送到Copy-Item命令中。
结合Get-Childitem（缩写为GCI）、-recurse和-filter命令，并将结果导出到Copy-Item命令中。首先使用-WhatIf检查输出是否符合预期。
将文件复制到另一个文件夹（在执行复制命令之前，请使用-WhatIf验证输出以确保命令正确）：
Get-Childitem -recurse R:\Contracts -filter *.txt | Copy-Item -Destination R:\Contracts\Sites -WhatIf
要做你所要求的多种文件类型，你可以运行多个命令，每个文件类型对应一个命令。
@echo off
set source="R:\Contracts"
set destination="R:\Contracts\Sites"
::Not sure if this is needed
::It guarantees you have a canonical path (standard form)
for %%F in (%destination%) do set destination="%%~fF"
for /r %source% %%F in (.) do if "%%~fF" neq %destination% ROBOCOPY "%%F" %destination% *.srt *.pdf *.mp4 *.jpg /COPYALL /R:0
与之前的PowerShell选项类似，我按照以下步骤对多级子目录音乐文件夹进行了扁平化处理：
#Get all files and not the directories
$files = Get-ChildItem -Path R:\Contracts -Recurse | Where {$_.PSIsContainer -eq $false}
#Copy items from sources to new destination
foreach ($file in $files){
Copy-Item -Path $file.FullName -Destination R:\Contracts\Sites\$($file.Name)
}
（保留HTML标签）
C:\files\somefiles\file.txt
C:\files\otherfiles\file.txt
目标位置为C：\ newdir \，文件被创建为C:\newdir\somefiles-file.txt
C:\newdir\otherfiles-file.txt
这里是代码，批处理文件1浏览文件，批处理文件2重命名并移动它们（如果要保留源，则也可以复制）：@echo off
for /r %%f in (*.*pr) do @renameandmovefilespart2.bat "%%f" "%%~ff" "%%~xf"
renameandmovefilespart2.bat
@echo off
Setlocal EnableDelayedExpansion
rem set the whole file path
set origWhole=%1
set origPathOnly=%2
set extension=%3
rem here you can set where the directory to hold the flattened hierarchy is
set destDir=c:\destinationDir\
rem set the directory to do a string replace
rem make this the starting directory, that you dont want in the newly renamed files
set startingDir=C:\starting\directory\
set nothing=
set slash=\
rem here you can set what the character to represent the directory indicator \ in the new files
set reaplcementDirectoryCharacter=--
set quote="
rem cut out the starting part of the directory
call set newname=%%origWhole:!startingDir!=!nothing!%%
rem replace slashes with new character
call set newname=%%newname:!slash!=!reaplcementDirectoryCharacter!%%
rem remove quotes
call set newname=%%newname:!quote!=!nothing!%%
rem @echo shortened: %newname%
rem @echo source path: %origPathOnly% newPath: %startingDir%
rem @echo extension: %extension%
rem rename the files
ren %origWhole% %newname%
rem prepare to move the file, clean up the source path
call set origPathOnly=%%origPathOnly:!quote!=!nothing!%%
move "%origPathOnly%%newname%" "%destDir%"
有一个旧的PCMag实用程序叫做Sweep.exe，它可以在当前目录和子目录中执行相同的命令。我不会将目标设置为源目录的子目录。请将目标放在其他地方。
http://www.rarewares.org/files/case/Sweep.zip
cd c:\contracts
sweep copy *.* c:\sites
这将把c:\contracts及其子目录下的所有内容复制到c:\sites。
我使用类似的命令来扁平化目录结构。
注意重复文件的处理方式。您想覆盖还是以其他方式处理它们。
对于熟悉 R 的人来说，将文件复制到单个文件夹可能很容易地编写脚本如下。对于大型集合和目录结构，它比 ROBOCOPY 更有效。
## R script - Flatten files in folder structure
# declare your paths
sourcepath<-C:\\Myfolder\\PicturesInStructure"
destpath<-"C:\\Myfolder\\PicturesTogether\\"
# read source filenames with path to vector variable
fileslist<-list.files(sourcepath,
pattern="*.jpg", # in this example copies JPG pictures
full.names=TRUE, # retrieves full path
recursive=TRUE, # runs through all subdirs
include.dirs=FALSE) # skips dir names (no to be copied)
# here you will get a head of your list
head(fileslist)
# ordinary loop by source filenames
for (i in 1:length(fileslist)) {
# Number of Slashes required to extract filename from the source path
NoS<-lengths(regmatches(fileslist[i], gregexpr("/", fileslist[i])))
# for lengthy processes it is good to know where you are with this
cat(i,fileslist[i]," \r")
# copy one file to a destination folder (full path composed with paste0())
file.copy(fileslist[i],paste0(destpath,unlist(strsplit(fileslist[i],"/"))[NoS+1]))
}