@echo off
Setlocal enabledelayedexpansion
for /f "tokens=2* delims=:" %%i in ('netsh wlan show profiles') do (
    set str=%%i
    for /f "tokens=3* delims= " %%d in ('netsh wlan show profiles key^=clear name^="!str:~1!"^| findstr "关键内容"') do (
        echo !str:~1! 密码：[%%d]
        echo !str:~1! 密码：[%%d]>>wifi.txt
    )
)
复制代码

@echo off
rem 批处理保存为ansi编码格式
for /f "tokens=2*" %%i in ('netsh wlan show profiles ^|find "所有用户配置文件"') do (
    for /f "tokens=2*" %%d in ('netsh wlan show profiles key^=clear name^="%%j" ^|find "关键内容"') do (
        echo %%j 密码：[%%e]
        echo %%j 密码：[%%e]>>wifi.txt
    )
)
pause
复制代码