在嵌套 FOR 循环中使用 DelayedExpansion

Question

我的目标是列出 PC 上的本地硬盘并在每个硬盘上搜索特定文件。如果找到，将文件的路径输出到名为“PCNAME.txt”的文本文件。我的期望如下：

set filename="abc.exe"
set uncpath="%userprofile%\desktop\"
set fullpath=%uncpath%\%computername%.txt

for /f %%a in ('wmic logicaldisk where "description='Local Fixed Disk'" get Caption ^| find ":"') do (
set letter=%%a
cd %letter%\ 

for /R %%f in (%filename%) do @IF EXIST %%f @echo File Location^(s^) Identified: >> %fullpath% & goto :search

:search
for /R %%f in (%filename%) do @IF EXIST %%f set filenew=%%f & call :trim
echo. >> %fullpath%
exit /b

:trim
set filenew=%filenew:"=%
@echo %filenew% >> %fullpath%
)

当删除第一个 FOR 循环并将当前工作目录更改为 C:\ 驱动器时，上述脚本可以正常工作。但我希望它在所有本地硬盘驱动器上运行。经过大量的谷歌搜索，我想这种方法可能是使用 DelayedExpansion。我也明白 FOR 循环内的 goto 正在取消循环。但我无法完全修复脚本。

我还想知道是否可以完全消除“修剪”标签，而是使用 DelayedExpansion 或其他方法直接在“搜索”标签下删除双引号。任何帮助将不胜感激。

Answer 1

永远不要在批处理脚本中使用多行代码块。

@for ... do @call :SubroutineName %%G
@exit /b 0
:Subroutine
rem Whatever.

然后在子例程中完成您的工作，而不必担心多行代码块中涉及的所有问题。您会发现使用 echo on 也更容易调试此类代码。

Answer 2

这是使用WMIC 和Dir 的一种方法：

@Echo Off
Set "filename=abc.exe"
Set "uncpath=%userprofile%\desktop"
Set "fullpath=%uncpath%\%computername%.txt"

Echo File Location(s) Identified:>"%fullpath%"
Set "_="
(For /F "Skip=1" %%A In (
    'WMIC LogicalDisk Where "DriveType='3'" Get DeviceID 2^>Nul') Do (
    For /F "Delims=" %%B In ('Dir /B/S/A-D-L "%%A\%filename%" 2^>Nul'
    ) Do Set "_=T" & Echo %%B))>>"%fullpath%"
If Not Defined _ Del "%fullpath%"

如果您只想要没有文件名本身的位置，请将11 行上的%%B 更改为%%~dpB。