|
FORUMS PROFESSIONNELS WINDEV, WEBDEV et WINDEV Mobile |
| | | | | |
Accueil → WINDEV 25 → WX - Trabalhando com Httprequest com os exemplos que usam CURL - API Pagseguro - API SMS - entre outras finalidades de integração. |
WX - Trabalhando com Httprequest com os exemplos que usam CURL - API Pagseguro - API SMS - entre outras finalidades de integração. |
Débuté par adrianoboller, 21 oct. 2015 14:35 - 6 réponses |
| |
| | | |
|
| |
Membre enregistré 3 659 messages Popularité : +175 (223 votes) |
|
Posté le 21 octobre 2015 - 14:35 |
Prezados,
Nesse tópico estartei passando um exemplo desenvolvido pelo meu amigo Fernando que exemplifica como trabalhar com Httprequest com os exemplos que usam CURL que podem ser usados para diversas finalidades, sendo uma delas a integração dos seus aplicativos com a API do Pagseguro, API de envio de SMS e entre outras finalidades de integração que necessitem ter op comando CURL.
Sobre o CURL: http://php.net/manual/pt_BR/book.curl.php https://en.wikipedia.org/wiki/CURL http://blog.thiagobelem.net/tutorial-basico-de-curl-instalacao-configuracao-e-uso/
API do PAGSEGURO: https://pagseguro.uol.com.br/v2/guia-de-integracao/api-de-pagamentos.html
Exemplo WX:
informacoes isstring="email=suporte@lojamodelo.com.br"+ "&token=95112EE828D94278BD394E91C4388F20"+ "¤cy=BRL"+ "&itemId1=0001"+ "&itemDescription1=Notebook Prata"+ "&itemAmount1=24300.00"+ "&itemQuantity1=1"+ "&itemWeight1=1000"+ "&itemId2=0002"+ "&itemDescription2=Notebook Rosa"+ "&itemAmount2=25600.00"+ "&itemQuantity2=2"+ "&itemWeight2=750"+ "&reference=REF1234"+ "&senderName=Jose Comprador"+ "&senderAreaCode=11"+ "&senderPhone=56273440"+ "&senderEmail=comprador@uol.com.br"+ "&shippingType=1"+ "&shippingAddressStreet=Av. Brig. Faria Lima"+ "&shippingAddressNumber=1384"+ "&shippingAddressComplement=5o andar"+ "&shippingAddressDistrict=Jardim Paulistano"+ "&shippingAddressPostalCode=01452002"+ "&shippingAddressCity=Sao Paulo"+ "&shippingAddressState=SP"+ "&shippingAddressCountry=BRA";
ResStart isboolean=HTTPRequest("https://ws.pagseguro.uol.com.br/v2/checkout/","PC Soft","",informacoes) IFResStart=TrueTHEN RTA_Resposta..CaptionHTML="HTML code: "+HTTPGetResult() +"<br>" RTA_Resposta..CaptionHTML+="Header: "+HTTPGetResult(httpHeader) +"<br>" RTA_Resposta..CaptionHTML+="Cookie: "+HTTPGetResult(httpCookie) END
Qualquer dúvida entrem em contato.
-- Adriano Jose Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller >______________________________________________ |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 3 659 messages Popularité : +175 (223 votes) |
|
Posté le 03 novembre 2015 - 15:54 |
Prezados,
Segue exemplo da integração com o serviço da DirectCall
informacoes isstring="access_token=@token@"+ "&origem=@origem@}"+ "&destino=@destino@}"+ "&texto=@texto@"+ "&cron=@cron@"+ "&tipo=texto"+ "&format=@format_sms@";
ResStart isboolean=HTTPRequest("https://api.directcallsoft.com/sms/send","PC Soft","",informacoes) IFResStart=TrueTHEN EDT_Resultado="HTML code: "+HTTPGetResult() +"<br>" EDT_Resultado+="Header: "+HTTPGetResult(httpHeader) +"<br>" EDT_Resultado+="Cookie: "+HTTPGetResult(httpCookie) END
Link complementar https://playground.directcallsoft.com/telecom
Baseado no codigo acima é possivel fazer as demais integrações.
Sendo o que tinha para o momento
-- Adriano Jose Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller >______________________________________________ |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 3 659 messages Popularité : +175 (223 votes) |
|
Posté le 26 juillet 2016 - 18:12 |
Para ter o Token do Pagseguro:
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/> |
| |
| |
| | | |
|
| | |
| |
Posté le 30 septembre 2016 - 02:40 |
Olá, este recurso está diponível para o Winde Mobile também? |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 44 messages Popularité : +7 (7 votes) |
|
Posté le 30 septembre 2016 - 19:41 |
sim!
http:
Tiago Linhares a écrit : > Olá, este recurso está diponível para o Winde Mobile também?
-- Analista de Sistemas Jr www.arsistemas.com.br >Pai da Alícia e Marido da Andréa <3 |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 3 659 messages Popularité : +175 (223 votes) |
|
Posté le 03 octobre 2016 - 20:11 |
Com certeza!!!!!
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 9949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/> |
| |
| |
| | | |
|
| | |
| |
Membre enregistré 3 659 messages Popularité : +175 (223 votes) |
|
Posté le 20 janvier 2020 - 14:12 |
ProcedureMemed_ApiRest_Homologacao(sUrl,sJson,TipoGetPost)
rest_requestis restRequest rest_responseis restResponse
sAPIKEYis string="iJGiB4kjDGOLeDFPWMG3no9VnN7Abpqe3w1jEFm6olkhkZD6oSfSmYCm" sSECRETKEYis string="Xe8M5GvBGCr4FStKfxXKisRo3SfYKI7KrTMkJpCAstzu2yXVN4av5nmL"
sUrl=sUrl+"?api-key=??sAPIKEY;1??&secret-key=??sSECRETKEY;1??"
fSaveText("C:\TEMP\MEMED.JSON",sJson)
rest_request..URL=sUrl
rest_request.ContentType=typeMimeJSON
IFsJson<>"" rest_request.Content=sJson END
IFUpper(TipoGetPost) ="POST" rest_request.Method=httpPost ELSE IFUpper(TipoGetPost) ="GET" rest_request.Method=httpGet ELSE IFUpper(TipoGetPost) ="DELETE" rest_request.Method=httpDelete ELSE IFUpper(TipoGetPost) ="PUT" rest_request.Method=httpPut ELSE IFUpper(TipoGetPost) ="COPY" rest_request.Method=httpCopy ELSE IFUpper(TipoGetPost) ="HEAD" rest_request.Method=httpHead ELSE IFUpper(TipoGetPost) ="PATCH" rest_request.Method=httpPatch END
rest_request.Header["Accept"] ="application/vnd.api+json"
rest_response=HTTPSend(rest_request)
Toast(rest_response..StatusCode) Toast(rest_response..Content)
arrayResultadois array of string Add(arrayResultado,rest_response..Content) Add(arrayResultado,rest_response..ContentType) Add(arrayResultado,rest_response..StatusCode) Add(arrayResultado,rest_response..DescriptionStatusCode)
RESULTarrayResultado
ProcedureMemed_ApiRest_Producao(sUrl,sJson,TipoGetPost)
rest_requestis restRequest rest_responseis restResponse
sAPIKEYis string="iJGiB4kjDGOLeDFPWMG3no9VnN7Abpqe3w1jEFm6olkhkZD6oSfSmYCm" sSECRETKEYis string="Xe8M5GvBGCr4FStKfxXKisRo3SfYKI7KrTMkJpCAstzu2yXVN4av5nmL"
sUrl=sUrl+"?api-key=??sAPIKEY;1??&secret-key=??sSECRETKEY;1??"
fSaveText("C:\TEMP\MEMED.JSON",sJson)
rest_request..URL=sUrl
rest_request.ContentType=typeMimeJSON
IFsJson<>"" rest_request.Content=sJson END
IFUpper(TipoGetPost) ="POST" rest_request.Method=httpPost ELSE IFUpper(TipoGetPost) ="GET" rest_request.Method=httpGet ELSE IFUpper(TipoGetPost) ="DELETE" rest_request.Method=httpDelete ELSE IFUpper(TipoGetPost) ="PUT" rest_request.Method=httpPut ELSE IFUpper(TipoGetPost) ="COPY" rest_request.Method=httpCopy ELSE IFUpper(TipoGetPost) ="HEAD" rest_request.Method=httpHead ELSE IFUpper(TipoGetPost) ="PATCH" rest_request.Method=httpPatch END
rest_request.Header["Accept"] ="application/vnd.api+json"
rest_response=HTTPSend(rest_request)
Toast(rest_response..StatusCode) Toast(rest_response..Content)
arrayResultadois array of string Add(arrayResultado,rest_response..Content) Add(arrayResultado,rest_response..ContentType) Add(arrayResultado,rest_response..StatusCode) Add(arrayResultado,rest_response..DescriptionStatusCode)
RESULTarrayResultado
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 99949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/>Message modifié, 20 janvier 2020 - 14:26 |
| |
| |
| | | |
|
| | | | |
| | |
| | |
| |
|
|
|