Windows8.1の無線LAN「制限あり」状態をリセットするスクリプト

青文字の部分を、拡張子「vbs」で保存してから実行します。

併せて、でじまみ様の「Windows 8 でVBScriptをピン留めする方法」がとても参考になると思います。

このスクリプトが実行している内容は、ネットワークアダプタを一度無効化してから再び有効化しているだけです。

ネットワークアダプタ名や、スリープのウェイトは、適宜調整してください。

' Windows8.1の無線LAN「制限あり」状態をリセットするVBScript

sIF = "Wi-Fi" ' ネットワークアダプタ名

iSleep = 3000 ' netsh.exeを実行する際のウェイト(3秒間)

Set oSh = CreateObject("Shell.Application")

If WScript.Arguments.Count = 0 Then
  oSh.ShellExecute "wscript.exe", """" & WScript.ScriptFullName & """ a", "", "runas"
  WScript.Quit
End If

WScript.Sleep iSleep
oSh.ShellExecute "netsh.exe", "interface set interface name=" & sIF & " disable"
WScript.Sleep iSleep
oSh.ShellExecute "netsh.exe", "interface set interface name=" & sIF & " enable"

WScript.Quit

これで艦これが捗りますね。
Venue 8 Proの無線LAN、なんとかしてくれー！トラブル多すぎなんじゃーい！