B4J Code Snippet Access to System Settings

Sub getAllSystemProperties
  ' Declare the javaobject and init the class
  Dim JO As JavaObject
  JO.InitializeStatic("java.lang.System")
  ' Get the system properties into one object
  Dim objProperties As Object = JO.RunMethod("getProperties", Null)
  ' Convert the properties object into a list of strings
  Dim s As String = objProperties
  s.SubString(1)
  Dim l As List
  l = Regex.Split(", ", s)
  l.Sort(True)
  ' List the properties
  For i = 0 To l.Size - 1
      Log(l.Get(i))
  Next
End Sub

import java.util.Map;
Public class EnvMap {
    Public static void main (String[] Args) {
        Map<String, String> env = System.getenv();
        For (String envName : env.keySet()) {
            System.out.format("%s=%s%n",
                              envName,
                              env.get(envName));
        }
    }
}