Fórum Envio de SMS com Delphi #453522
29/08/2013
0
pensei até em usar um modem 3g no meu servidor, e vender este serviço de SMS para meus clientes, alguma dica ?
Andre Ucella
Curtir tópico
+ 0Posts
29/08/2013
Rafael Mota
A minha opinião é a seguinte:
Modem 3g ==> O envio de SMS fica mais em conta (barato) e vc ainda consegue enviar mensagens em lote;
Abraços...
Gostei + 0
29/08/2013
Rafael Mota
A minha opinião é a seguinte:
Modem 3g ==> O envio de SMS fica mais em conta (barato) e vc ainda consegue enviar mensagens em lote;
Abraços...
Gostei + 0
24/11/2013
Edson Carlos
Li alguns materiais falando para usar INDY.
Tenho uma Aplicação que gerencia os clientes. Ocorre que preciso enviar SMS periodicamente para alguns desses clientes e para isso preciso de integrar o envio ao meu sistema.
Achei vários componentes pagos. Mas, o custo da minha aplicação aumentaria. Se puderem me dar uma luz!
Uso DELPHI XE3.
Gostei + 0
24/11/2013
Leandro
AcbrSMS
Gostei + 0
27/10/2016
Gilson Freitas
Gostei + 0
31/12/2021
Dalton
pensei até em usar um modem 3g no meu servidor, e vender este serviço de SMS para meus clientes, alguma dica ?
Simples, use a Facilita SMS para adquirir os créditos, e use o trecho abaixo para enviar:
var lURL : String;
lResponse : TStringStream;
begin
lResponse := TStringStream.Create('');
try
lURL := 'http://api.facilitamovel.com.br/api/simpleSend.ft?user=xxx&password=xxx&destinatario=5191561100&externalkey=123&msg=Ola%20Facilita';
idHttp1.Get(lURL, lResponse);
lResponse.Position := 0;
{ Exemplo de uso do response : carregar o conte�do num RichEdit : }
reResp.Lines.LoadFromStream(lResponse);
finally
lResponse.Free();
end;
------------- LEITURA DAS RESPOSTAS ----------------------
var lURL : String;
lResponse : TStringStream;
begin
lResponse := TStringStream.Create('');
try
//Obtem dados de retorno da API via URL
lURL := 'http://api.facilitamovel.com.br/api/readMO.ft?user=xxx&password=xxx';
//Showmessage(lURL);
idHttp1.Get(lURL, lResponse);
lResponse.Position := 0;
{ Exemplo de uso do response : carregar o conteudo num RichEdit : }
reResp.Lines.LoadFromStream(lResponse);
finally
lResponse.Free();
end;Maiores informações, visite o nosso manual de integração
https://www.facilitamovel.com.br/integracoes.ft
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)