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!
|
