SetSystemProperty("http.proxyHost","webwasher.xxxx.com")
SetSystemProperty("https.proxyHost", "webwasher.xxx.com")
SetSystemProperty("http.proxyPort", 3128)
SetSystemProperty("https.proxyPort", 3128)
SetSystemProperty("https.proxyUser", <username>)
SetSystemProperty("https.proxyPassword", <pwd>")
Sub SetProxy (hc As OkHttpClient, Host As String, Port As String)
Dim jo As JavaObject = hc
Dim proxy, socketaddress As JavaObject
socketaddress.InitializeNewInstance("java.net.InetSocketAddress", Array(Host, Port))
proxy.InitializeNewInstance("java.net.Proxy", Array("HTTPS", socketaddress))
jo.GetFieldJO("client").RunMethod("setProxy", Array(proxy))
End Sub