对于频繁出差,时常更换办公室,忘记WiFi密码那是司空见惯,不过希望以下代码能够助你轻松解除困境,只要有电脑连接过该WiFi且能正常上网,则请复制以下代码,然后用记事本另存为bat文件,则手到擎来,探囊取物。
@echo off
::MODE con: COLS=165 LINES=65
title 查看WIFI密码 %date%
::获取管理员权限
setlocal
set uac=~uac_permission_tmp_%random%
md "%SystemRoot%\system32\%uac%" 2>nul
if %errorlevel%==0 ( rd "%SystemRoot%\system32\%uac%" >nul 2>nul ) else (
echo set uac = CreateObject^("Shell.Application"^)>"%temp%\%uac%.vbs"
echo uac.ShellExecute "%~s0","","","runas",1 >>"%temp%\%uac%.vbs"
echo WScript.Quit >>"%temp%\%uac%.vbs"
"%temp%\%uac%.vbs" /f
del /f /q "%temp%\%uac%.vbs" & exit )
endlocal
:: *********************************************************************** 我是分割线
netsh wlan show profile
echo ************************************************************************
echo 提示:以上为本机所连接过WIFI信息
echo ************************************************************************
:menu
echo.
set /p var=请输入你要查看密钥WLAN:
if "%var%" equ "" goto menu
if %var% equ 15 exit
netsh wlan show profile name="%var%" key=clear >kbc.txt
type kbc.txt
关键词:忘记WiFi密码不用愁(wiFi忘记密码)