对于频繁出差,时常更换办公室,忘记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 | findstr 关键内容
ping /n 10 127.0.0.1 >nul
在红色框处录入需要查询的WiFi用户名,回车即可。
比如录入JKM-TL00后,即显示密码:12345678