I subclassed HTTPSecuredSocket and added code to the HeadersReceived event. When I send a JSON string to the server, I get a reply, but the HeadersReceived event never fires. I need the status code returned in the header to know what to do with the result. My code for sending the JSON is
mySoc.SetRequestContents(s, "application/json")
dim reply as string = mySoc.Post(address, 60)
where s is the JSON string and address is the URL.