Скрипт для мониторинга пропадания соединения Wi-Fi

Question

Я страдал от выпадения WiFi (WiFi поменялся на "Limited"), используя предоставленный провайдером маршрутизатор в течение нескольких недель. С тех пор я модернизировал свое сетевое оборудование и хотел бы в течение нескольких дней следить за моим WiFi-подключением, чтобы убедиться, что оно исправлено правильно. После обновления я не заметил никаких пропаданий, но хочу быть уверен на 100%. (Как ни странно, только мой ноутбук с Windows перенес выпадения - iPad и iPhone в моем доме были в порядке.)

Кто-нибудь знает, как я мог контролировать состояние моего WiFi-соединения? Я бы предпочел проверять это каждую минуту или около того и просто оставить скрипт запущенным на несколько дней. Я не очень хорошо разбираюсь в Windows, поэтому рад, что меня укажут на сценарий, если вы можете что-нибудь порекомендовать.

Примечание: это Windows 8.1 x64; Я знаю, что это немного расплывчато, но я не знаю, с чего начать.

Answer 1

Разве ваш маршрутизатор не регистрирует события отключения? В любом случае вы можете попробовать следующий скрипт:

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objLog = objFSO.CreateTextFile("C:\NetLog.txt", False)
Set objWMIService = GetObject("winmgmts:\\.\root\wmi")
Set colMonitoredEvents = objWMIService.ExecNotificationQuery("Select * from MSNdis_StatusMediaDisconnect")
Do While True
    Set strLatestEvent = colMonitoredEvents.NextEvent
    objLog.Write "[" & Date & " " & Time & "] A network connection has been lost: " & strLatestEvent.InstanceName & vbCrLf
Loop

Сохраните его как что-то вроде NetCheck.vbs и запустите, затем выключите маршрутизатор и посмотрите, правильно ли зарегистрировано отключение. Чтобы завершить запись в журнал, убейте Wscript.exe через диспетчер задач.