コマンドプロンプト等で、WIFIの"ネット接続"が有効かチェックする方法はありますでしょうか。

Webページの巡回の前に接続確認ってことですよね。
WSH で VBScript を使うのではどうでしょう。

こんな感じのスクリプトを、例えば check_http.vbs とかに書いておいて、

url = "http://www.yahoo.co.jp/"

Set xhr = CreateObject("MSXML2.ServerXMLHTTP")
xhr.Open "HEAD", url, False
xhr.Send
If xhr.Status < 400 Then
    WScript.Echo "OK"
Else
    WScript.Echo "NG"
End If

コマンドは、こうです。

cscript //nologo check_http.vbs

相手と応答が取れると、標準出力に "OK" と出します（ダメなら "NG"）。

HEAD というコマンドは、HTTP のヘッダだけを返すだけで HTML の内容を返しません。
ブラウザ起動するよりは、かなり軽いです。

url は Yahoo! のトップページにしてますが、巡回目的ならそこのページの方が適切かもしれません。

もし、バッチの ERRORLEVEL でのやり取りのイメージならこんなスクリプトになります。

url = "http://www.yahoo.co.jp/"

Set xhr = CreateObject("MSXML2.ServerXMLHTTP")
xhr.Open "HEAD", url, False
xhr.Send
If xhr.Status < 400 Then
    WScript.Quit(0)
Else
    WScript.Quit(1)
End If

成功すると 0 、失敗だと 1 を返します。
変えているのは最後だけです。

判定は UWSC 側でやるなら xhr.Status そのものをやり取りしても良いかもしれません。


あ、でも UWSC って OLE 使えるんでしたよね。

このサンプルが一番近いです。
http://www.uwsc.info/sample.html#N43

GET ではなく HEAD を使って、responseXML ではなく Status で判定するようにしたら、
HTTP 接続ができるかどうかの関数になると思います。

Function CheckHttp(url)
  oHttp = CreateOLEObj("MSXML2.XMLHTTP")
  oHttp.Open("HEAD", url, 0)
  oHttp.Send
  Ifb oHttp.Status < 400  Then
    Result = True
  Else
    Result = False
  EndIf
Fend