VPN利用時にコケてWAN Miniportのアンインストール作業がめんどくさい！

これ、これこれ。

【VPN】Windowsで，「初期化中...」となったまま接続できません – 神戸大学情報基盤センター

表示されたデバイスのうち，名前が「Wan Miniport」から始まるものを右クリックし，表示されたメニューから「デバイスのアンインストール」を選択し，順番に全てアンインストールして下さい．（WAN Miniport (IKEv2)，WAN Miniport (IP)等,8個程度存在します）

で、「pnputil /remove-device」アンインストールできて

「pnputil /scan-devices」にて再スキャンしてくれる。

そんでもって、UACのUAC 昇格を前に持ってきてあげて、下記内容をコピーして、メモ帳開いて、貼り付け。名前つけて保存にて、「.cmd」にて保存。

保存出来たら、作ったファイルをダブルクリックで実行。Adminなし利用差で運用してる環境でなければ、初期化が出来るよと。

# wanportsのアンインストールと再読み込みをバッチファイルで対処します
@echo off
REM Auto check & get admin rights

CLS
:checkPrivileges
NET FILE 1>NUL 2>NUL
if '%errorlevel%' == '0' ( goto gotPrivileges ) else ( goto getPrivileges )

:getPrivileges
if '%1'=='ELEV' (shift & goto gotPrivileges)
ECHO.
ECHO ***********************************
ECHO Invoking UAC to escalate privilege
ECHO ***********************************

setlocal DisableDelayedExpansion
set "batchPath=%~0"
setlocal EnableDelayedExpansion
ECHO Set UAC = CreateObject^("Shell.Application"^) > "%temp%\OEgetPrivileges.vbs"
ECHO UAC.ShellExecute "!batchPath!", "ELEV", "", "runas", 1 >> "%temp%\OEgetPrivileges.vbs"
"%temp%\OEgetPrivileges.vbs"
exit /b

:gotPrivileges
::::::::::::::::::::::::::::
::START
::::::::::::::::::::::::::::
setlocal & pushd .

REM Write your batch script from here

chcp 65001
ECHO "ネットワークアダプタの「WAN Mini port」類をアンインストールして、再スキャンをします"

pnputil /remove-device "SWD\MSRRAS\MS_AGILEVPNMINIPORT"
pnputil /remove-device "SWD\MSRRAS\MS_NDISWANIP"
pnputil /remove-device "SWD\MSRRAS\MS_NDISWANIPV6"
pnputil /remove-device "SWD\MSRRAS\MS_L2TPMINIPORT"
pnputil /remove-device "SWD\MSRRAS\MS_NDISWANBH"
pnputil /remove-device "SWD\MSRRAS\MS_PPPOEMINIPORT"
pnputil /remove-device "SWD\MSRRAS\MS_PPTPMINIPORT"
pnputil /remove-device "SWD\MSRRAS\MS_SSTPMINIPORT"

ECHO "再スキャンします"

pnputil /scan-devices

ECHO "コマンドを実行し終わりました。何かを押してください。"
PAUSE

はい、以上です。

走り書き

ちょこっとしたメモを残してく。

VPN利用時にコケてWAN Miniportのアンインストール作業がめんどくさい！