sub init()
    m.top.functionName = "executeTest"
end sub

function executeTest() as void
    ' This task gets run one at the start, and then
    ' again every time the OK button is pressed.

    deviceInfo = CreateObject("roDeviceInfo")
    aaConnectionInfo = deviceInfo.GetConnectionInfo()
    for each key in aaConnectionInfo
        val = aaConnectionInfo[key]
        m.top.updateText = key + " = " + val.ToStr()
    end for

end function