Public Sub getSSIDList As List
Dim ssids As List
ssids.Initialize
Dim wifiManager As JavaObject = getWifiManager
Dim jo_ssids As JavaObject = wifiManager.RunMethod("getScanResults", Null)
Log("getSSIDList: " & jo_ssids.RunMethod("toString", Null))
' TODO
Return ssids
End Sub
Private Sub getWifiManager As JavaObject
Dim jo As JavaObject
Return jo.InitializeContext.RunMethod("getSystemService", Array("wifi"))
End Sub