Postada em 15/07/2024 08:27 hs
Tenho uma integracao, obtendo dados de um EndPoint, mas agora temos uma alteracao na conexao e preciso colocar na chamada, para:
- Desabilita verificação do certificado SSL - Desabilita verificação do host SSL
e me passaram este modelo em PHP, mas preciso fazer isso no vb, para usar a mesma app
$ch = curl_init($url); curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); curl_setopt($ch, CURLOPT_HEADER, true); curl_setopt($ch, CURLOPT_NOBODY, true); curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false); // Desabilita verificação do certificado SSL curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false); // Desabilita verificação do host SSL curl_setopt($ch, CURLOPT_USERPWD, "$httpsUsername:$httpsPassword"); // Adiciona autenticação HTTP $response = curl_exec($ch); $httpCode = curl_getinfo($ch, CURLINFO_HTTP_CODE); $curlError = curl_error($ch); curl_close($ch);
-------------------------------------------------------------------------- Estou usando isso:
Dim objXMLHttp as New MSXML2.ServerXMLHTTP60
objXMLHttp.Open "GET", URLSERVER, False, "USUARIO", "SENHA" objXMLHttp.setRequestHeader “Content-Type”, “text/xml; charset=utf-8” objXMLHttp.setRequestHeader “Authorization”, “Basic “ & Base64Encode(“USUARIO:SENHA”) objXMLHttp.send XMLENVIO
iResposta = objXMLHttp.responseText
Set objXMLHttp = Nothing --------------------------------------------------------------------------
Agradeço muito, se alguém puder me ajudar a colocar estes parametros do PHP que funcionaram nesta chamada do VB6!
|