WiFi WHAT Connected ?? Really

CharlesIPTI

Active Member
Licensed User
Longtime User
Using ABWifiInfo How to Validate WiFi Is Connected

Does anyone see a glaring error here?? Because Assuredly ONE of my wifi connections IS connected but the results of this little method all say no connection is actually connected:
PHP:
Sub WiFiTwo

Dim r As Boolean
Dim a As Int 
Dim nFo As ABWifiInfo 
r = myWifi.ABLoadWifi() 

nFo = myWifi.ABGetCurrentWifiInfo() 
Msgbox("Connected 0 :: " & nFo.IsConnected, "")

If r = True Then
Msgbox (myWifi.ABGetCurrentWifiInfo().SSID, "")

For a = 0 To myWifi.ABNumberOfAvailableWifiNetworks - 1

Msgbox(myWifi.ABGetWifiNetwork(a).SSID & " " & 
myWifi.ABGetWifiNetwork(a).Level & " " & 
myWifi.ABGetWifiNetwork(a).IsConnected, "")

Next
Else
Msgbox(myWifi.ABWifiLastError,"") 
End If
End Sub

IS this more appropriate then ??? I had hoped I could check the Is Connected..
PHP:
    Sub WiFiThree  

        Dim r As Boolean 
                 Dim a As Int         
        Dim nFo As ABWifiInfo                  
         
    r = myWifi.ABLoadWifi()                 
        nFo = myWifi.ABGetCurrentWifiInfo()                         
        Msgbox(nFo, "") 
         
    If nFo <> Null Then 
        Msgbox ("Apparently it is connected", "PLPLP") 
         
    Else 
       Msgbox ("Apparently NO connection is active ", "PLPLP") 
    End If 
End Sub
 
Last edited:
Top