Ir para conteúdo
Fórum Script Brasil

JRSANTANNA

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre JRSANTANNA

JRSANTANNA's Achievements

0

Reputação

  1. 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!
×
×
  • Criar Novo...