asked on
set http_req = CreateObject("WinHTTP.WinHTTPRequest.5.1")
http_req.open "GET", "https://howsmyssl.com/a/check", false
http_req.send
MsgBox http_req.responseText
the response:{"given_cipher_suites":["TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA","TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA","TLS_RSA_WITH_AES_256_CBC_SHA","TLS_RSA_WITH_AES_128_CBC_SHA","TLS_ECDHE_ECDSA_WITH_AES_256_CBC_SHA","TLS_ECDHE_ECDSA_WITH_AES_128_CBC_SHA","TLS_RSA_WITH_3DES_EDE_CBC_SHA"],
"ephemeral_keys_supported":true,"session_ticket_supported":false,"tls_compression_supported":false,
"unknown_cipher_suite_supported":false,"beast_vuln":false
,"able_to_detect_n_minus_one_splitting":true,"insecure_cipher_suites":{},
"tls_version":"TLS 1.0","rating":"Bad"}