Pesquisar na Comunidade
Showing results for tags 'erro socket 1061'.
Encontrado 1 registro
-
Estou precisando de enviar um arquivo XML para um WebService e estou tendo algumas dificuldades. Estou quebrando a cabeça, e tenho poucos dias para conseguir transmitir os arquivos. Então, pensei que talvez alguém do suporte possa me dar uma luz.Tenho o seguinte cenário:* Enviar uma requisição HTTP completa para o web service do SCB que deverá conter os headers semelhantes ao exemplo abaixo:POST /scb/v1.0/bilheterias HTTP/1.1 Authorization: QWxhZGRpbjpvcGVuIHNlc2FtZQ Content-Type: application/json* web service SCB segue o padrão RESTURL: https://scb.ancine.gov.br/scb/v1.0/bilheterias Método HTTP: POSTMeu código: procedure TForm1.BtTransmiteClick(Sender: TObject); Var Response: TStringStream; Arquivo: TIdMultipartFormDataStream; begin Response := TStringStream.Create(''); Arquivo := TIdMultiPartFormDataStream.Create; Try Arquivo.AddFile('xml', 'c:\ancine.xml', 'xml/text'); IdHTTP.Request.CustomHeaders.Clear; IdHTTP.Request.Clear; IdHTTP.Request.Accept := 'text/xml'; IdHTTP.Request.ContentType := 'text/xml'; IdHTTP.Request.BasicAuthentication := True; IdHTTP.Request.Authentication := TIdBasicAuthentication.Create; IdHTTP.Request.Authentication.Password:= 'QWxhZGRpbjpvcGVuIHNlc2FtZQ'; IdHTTP.Request.Authentication.Username:= 'admin'; IdHTTP.Request.ContentEncoding := 'utf-8'; IdHTTP.Request.Referer := '/scb/v1.0/bilheterias HTTP/1.1'; IdHTTP.Post('http://scbcertificacao.ancine.gov.br/scb/v1.0/', Arquivo, Response); finally ShowMessage(Response.DataString); Response.Free(); Arquivo.Free() end; end; Componentes que estou utilizando:TIdHTTPTIdSSLIOHandlerSocketQuando estou enviando o arquivo me Retorna o erro socket #10061 Connection refused Desde já agradeço
