API MERCADO LIVRE

 Tópico anterior Próximo tópico Novo tópico

API MERCADO LIVRE

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#477087 - 10/10/2017 15:37:51

LCSSP

Cadast. em:Dezembro/2008


Boa Tarde Srs.

Estou realizando uma integração com o Mercado Livre via API, porém me deparei com um problema, me retornar um erro (file not found), mas já tente de todas as formas e o arquivo ainda não é recebido pela API.
Se alguem já trabalhou com esta API ou conhece o componente para comunicação e já enviou arquivo pelo mesmo, eu agradeço a ajuda.

Link da API: API Mercado Livre

  
    Dim adoStream
    Dim xmlhttp
    Dim tresult
    
    Set adoStream = CreateObject("ADODB.Stream")
    
    adoStream.Mode = 3        
    adoStream.Type = 1          
    
    adoStream.Open
    adoStream.LoadFromFile (app.path & "\teste.jpg")
      
    'Post the file data
    Set xmlhttp = CreateObject("msxml2.XMLHTTP.4.0")
    adoStream.Position = 0
    xmlhttp.Open "POST", "https://api.mercadolibre.com/pictures?access_token=MEUTOKEN", False
    xmlhttp.SetRequestHeader "Content-Length", adoStream.Size
    xmlhttp.SetRequestHeader "Content-Type", "multipart/form-data; boundary=Xu023434ww"
    xmlhttp.send adoStream.Read(adoStream.Size)
    
    tresult = xmlhttp.responseText
    MsgBox tresult
    Set adoStream = Nothing
    Set xmlhttp = Nothing





#477088 - 10/10/2017 15:55:48

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Amigo, aconselho seriamente utilizar .NET para consumir WebAPI.

_______________________________________________________________________
Gostaria de ter seu sistema Desktop "traduzido" para uma interface web? Podemos conversar...
Virei Oráculo!
The end is nigh, be ready for the nukes!


 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário