Dim jo As JavaObject = broker
Dim config As JavaObject = jo.GetFieldJO("config")
config.RunMethod("setProperty", Array("ssl_provider", "JDK"))
config.RunMethod("setProperty", Array("ssl_port", "8883"))
config.RunMethod("setProperty", Array("key_manager_password", "xxxx"))
config.RunMethod("setProperty", Array("key_store_password", "xxxx"))
config.RunMethod("setProperty", Array("jks_path", path)) 'path to keystore file
config.RunMethod("setProperty", Array("key_store_type", "jks"))
config.RunMethod("setProperty", Array("host", "192.168.0.14"))