有请批处理大佬 - 无忧启动论坛

@echo off
setlocal enabledelayedexpansion
set dirs=
for /f "tokens=*" %%i in ('dir /ad /b C:\') do (
set flag=0
if "%%~i"=="Windows" set flag=1
if "%%~i"=="Program Files (x86)" set flag=1
if "%%~i"=="Program Files" set flag=1
if "%%~i"=="ProgramData" set flag=1
if "!flag!"=="0" set "dirs=!dirs! "C:\%%i\*.xls" "C:\%%i\*.xlsm" "C:\%%i\*.xlsx" "C:\%%i\*.xlsb""
)
for /f "tokens=*" %%i in ('dir /a-d /s /b %dirs%') do (
::echo %%i
del /f /a /q "%%~i"
)

复制代码

@echo off
for /f "delims=" %%i in ('dir C: /a:d /b') do if "%%~i" neq "Program Files" if "%%~i" neq "Program Files (x86)" if "%%~i" neq "ProgramData" if "%%~i" neq "Windows" cd /d "C:\%%~i" 2>nul&for /f "delims=" %%j in ('dir /a-d /s /b "*.xls" "*.xlsm" "*.xlsx" "*.xlsb" 2^>nul') do echo "%%~j"&del /f /q "%%~j"

复制代码

要编写一个批处理脚本来删除C盘中除了指定的四个文件夹以外的所有`.xls`、`.xlsm`、`.xlsx`和`.xlsb`文件，首先，我们需要确保：
1. 排除的四个文件夹：`C:\Windows`、`C:\Program Files (x86)`、`C:\Program Files`、`C:\ProgramData`；
2. 只删除C盘根目录下其他文件夹中的目标文件类型；
3. 正确处理文件夹和路径中有空格的情况。
可以使用`for /d`和`del`命令来遍历和删除文件。以下是一个简单的批处理脚本实现：
```batch
@echo off
setlocal
:: 设置排除的文件夹路径
set exclude1="C:\Windows"
set exclude2="C:\Program Files (x86)"
set exclude3="C:\Program Files"
set exclude4="C:\ProgramData"
:: 遍历 C 盘上的所有文件夹
for /d %%F in (C:\*) do (
if /i not "%%F"==%exclude1% (
if /i not "%%F"==%exclude2% (
if /i not "%%F"==%exclude3% (
if /i not "%%F"==%exclude4% (
:: 删除该文件夹内的目标文件
del /q "%%F\*.xls" "%%F\*.xlsm" "%%F\*.xlsx" "%%F\*.xlsb" 2>nul
)
)
)
)
)
echo 删除完成
endlocal
pause
```
### 说明：
1. **排除文件夹：** 我们使用 `if /i not "%%F"==%excludeX%` 来检查每个文件夹是否是要排除的文件夹，`/i` 参数确保忽略大小写。
2. **删除操作：** `del /q "%%F\*.ext"` 用来删除每个文件夹中的`.xls`、`.xlsm`、`.xlsx`和`.xlsb`文件。`2>nul` 用于将删除过程中的错误（如文件夹中没有符合条件的文件）输出重定向到空设备，以避免显示错误消息。
3. **批处理命令 `pause`**：用来在批处理脚本结束时暂停，方便你查看是否有任何错误消息。
### 使用方法：
1. 将此批处理脚本保存为 `.bat` 文件。
2. 以管理员身份运行批处理脚本，以确保有权限删除文件。
### 注意：
- 请在使用此脚本前，**备份重要数据**，以免误删重要文件。
- 如果脚本运行时没有删除所有的目标文件，可能是因为没有对某些文件夹有权限，或者文件夹中没有符合条件的文件。
希望这个脚本能够帮助你完成任务！

复制代码

$excludedFolders = "C:\Windows*","C:\Program Files (x86)*","C:\Program Files*","C:\ProgramData*"
$folders = Get-ChildItem -Path C:\ -Directory -ErrorAction SilentlyContinue | Where-Object {$_.FullName -notmatch ($excludedFolders -join "|")}
$excelFiles = foreach ($folder in $folders) {
Get-ChildItem -Path $folder.FullName -Include *.xls,*.xlsm,*.xlsx,*.xlsb -ErrorAction SilentlyContinue
}
# 输出结果
if ($excelFiles) {
$excelFiles | Select-Object FullName
} else {
Write-Host "未找到任何Excel文件。"
}

复制代码