Clipper On Line • Ver Tópico - Chamada HTTP para envio de SMS

Chamada HTTP para envio de SMS

Discussão sobre a linguagem CA-Clipper.

Moderador: Moderadores

 

Chamada HTTP para envio de SMS

Mensagempor Hermeto » 20 Set 2009 20:06

Contratamos pelo site www.fastsms.com.br crédito para envio de sms, no entanto o sistema de contatos é precário, por isso estamos precisando de uma rotina para envio de sms pelo nosso sitema desevolvido em clipper utilizando uma chamada http de acordo com orientacao a seguir:

http://www.fastsms.com.br/sms.cfm?id=MeuID&senha=MinhaSenha&para=XXXXXXXXXX&texto=Meu+texto


No site ele tem orientacao para outras linguagens
http://www.fastsms.com.br/como-funciona.htm

Pode ser bem fácil, desculpem a ignorancia, é que deixei de ser programador profissional desde 1998 e desde entao apenas dou manutencao no sistema que criei na época que utilizo em nossa empresa Corretora de Seguros. QUer dizer, meus conhecimento ficaram bem restritos ao antigo summer 87.

Para os desenvolvedores, favor apresentar orcamento para solucao acima.

Atenciosamente,

Hermeto Aguiar Júnior
Master Parceria Corretora de Seguros
www.masterparceria.com.br
(85)3306-5040 - 9985-0360
Avatar de usuário

Hermeto
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 10
Data de registro: 20 Set 2009 19:42
Cidade/Estado: Fortaleza
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Re: CHAMADA HTTP PARA ENVIO DE SMS

Mensagempor Maligno » 20 Set 2009 20:59

Olá.
Seja bem-vindo ao fórum. :)

O que você precisa é apenas um meio de acessar o protocolo HTTP pelo Clipper. Nativamente não é possível, você deve saber. Entretanto, há uma biblioteca que permite isso de forma simples. É a biblioteca WAPI, com a função DLoadFile(). Exemplo simples:

loca cRet := ""
local cLink := "http://www.fastsms.com.br/sms.cfm?id=MeuID&senha=MinhaSenha&para=XXXXXXXXXX&texto=Meu+texto"

if DLoadFile(cLink,@cRet)
   // Função executada normalmente!
   // Se há uma página de retorno, seu conteúdo está
   // na variável cRet, passada por referência.
end


Isso é feito através de um programa externo com o qual o programa Clipper se comunica por arquivos texto. Mas no uso dessa biblioteca, os procedimentos de repasse de argumentos e o tratamento do retorno (em ambos os casos sempre texto), tudo é feito de forma automática. A função em questão retorna TRUE se o procedimento foi executado com sucesso. Em caso contrário, há uma interface para análise dos códigos de retorno.

Há um tópico especialmente criado para esta biblioteca, na seção "Ferramentas de Apoio". Clique aqui para ir até a mensagem que contém uma descrição do conteúdo da última versão. O endereço para download está lá.

Se quiser discutir sobre essa ou alguma outra função dessa biblioteca, por favor, utilize aquela seção, naquele mesmo tópico. Assim facilitamos a organização do fórum.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar de usuário

Maligno
Membro Master

Membro Master
 
Mensagens: 6390
Data de registro: 06 Jul 2004 01:40
Cidade/Estado: Londrina/PR
Curtiu: 1 vez
Mens.Curtidas: 14 vezes

Re: Chamada HTTP para envio de SMS

Mensagempor Hermeto » 21 Set 2009 21:20

Prezado Maligno,

Não temos palavras... :D :)) :{ :)Pos :|< :-Y

Desculpa a ALEGRIA DEMASIADA, mas imaginar que o nosso Sistema em CLIPPER é capaz de enviar e-mail automaticamente (SMTPSEND) para os nossos Segurados informando parcelas em aberto/atraso e informar que o seguro irá vencer, E AGORA com a utilizacao da biblioteca WAPI, podemos enviar SMS para os nossos segurados, utilizando a funcao DLOADFILE() junto com os servicos contratados previamente no site www.fastsms.com.br, é sem dúvida SHOW DE BOLA.

Por isso MUITO OBRIGADO POR VOCÊ EXISTIR....

Em resumo, para quem um dia possa imaginar o que isso implica: O Sistema em CLIPPER agora pode enviar SMS PERSONALIZADO para os clientes no dia do aníversário, quando as parcelas estiverem em aberto, quando determinado produto estiver em falta no estoque, será enviado SMS informando ao fornecedor, milhares de aplicacoes pode ser adaptada e utilizada... Para isso, utilizando servicos pré-pagos de SMS e utilizando a BENDITA, BENDITA, BENDITA funcão da Biblioteca WAPI.

Abracos e Muito Obrigado!

Atenciosamente,

Hermeto Aguiar Júnior
Master Parceria Corretora de Seguros
www.masterparceria.com.br
(85)3306-5040 - 9985-0360
Avatar de usuário

Hermeto
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 10
Data de registro: 20 Set 2009 19:42
Cidade/Estado: Fortaleza
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Re: Chamada HTTP para envio de SMS

Mensagempor Maligno » 22 Set 2009 00:49

Estamos aí pra isso mesmo. :)

Aliás, também quero agradecer pelo link dessa empresa de SMS. Como é o tipo da coisa que nunca precisei, não sabia que existia. Mas é bom saber que temos este recurso, e num preço tão acessível.

PS: Aproveite para ler o README incluso nesta biblioteca, para conhecer mais detalhes desta e das demais funções. É um material extenso. Eu passei um exemplo dos mais simples, mas há muito mais, como por exemplo a função IsInternet(), para descobrir se há uma conexão ativa. Mais um exemplo, que informa a hora de um servidor:

function Main(cState)
set date british
set century off
*
clear
if IsInternet()
   cSrv := "buzinello.com"
   cRet := ""
   if DLoadFile("www."+cSrv+"/servertime.php",@cRet)
      ? "No servidor " + cSrv + ":"
      ? "--------------------------"
      ? "Data: " + DtoC(StoD(Left(cRet,8)))
      ? "Hora: " + Transf(Right(cRet,6),"@R 99:99:99")
   else
      ? "ERRO desconhecido!"
   end
else
   ? "ERRO: desconectado ou bloqueado pelo firewall!"
end
?

Há um EXE pronto nesse ZIP.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar de usuário

Maligno
Membro Master

Membro Master
 
Mensagens: 6390
Data de registro: 06 Jul 2004 01:40
Cidade/Estado: Londrina/PR
Curtiu: 1 vez
Mens.Curtidas: 14 vezes

Re: Chamada HTTP para envio de SMS

Mensagempor alxsts » 22 Set 2009 02:04

Olá!

Este tópico tambem contribuiu para enriquecer meus conhecimentos. Vejam:
- Faz um ano que participo do Clipper On Line. Sabia da existência da WAPI.
- Há quase um ano precisei de algo para colocar/retirar coisas do clipboard.
- Vi neste forum as funções da OSLIB e que não funcionam no XP. Mas não vi este tópico... desisti.

Bem, nunca é tarde mesmo... Vou fazer o download da WAPI e estudar.
[]´s
Alexandre Santos (AlxSts)
alxsts
Colaborador

Colaborador
 
Mensagens: 2943
Data de registro: 12 Ago 2008 15:50
Cidade/Estado: São Paulo-SP-Brasil
Curtiu: 21 vezes
Mens.Curtidas: 248 vezes

Re: Chamada HTTP para envio de SMS

Mensagempor Maligno » 22 Set 2009 02:21

Lembrando os amigos: qualquer dúvida sobre a WAPI, apesar de ser Clipper, usem o tópico dedicado a ela, pra que não fique OFF-TOPIC nesta seção.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar de usuário

Maligno
Membro Master

Membro Master
 
Mensagens: 6390
Data de registro: 06 Jul 2004 01:40
Cidade/Estado: Londrina/PR
Curtiu: 1 vez
Mens.Curtidas: 14 vezes

Re: Chamada HTTP para envio de SMS

Mensagempor Romeu » 22 Set 2009 23:01

Achei interessante este tópico, mas gostaria de aprender a usar a lib wapi.

O que eu fiz:

baixei a wapi_v1.03
copiei a wapi.lib para c:\clipper5\lib
peguei o ex: do Maligno "function Main(cState)" e copiei como teste.prg
compilei: clipper teste
linkei: rtlink fi teste lib wapi

e entao:

undefined symbols after library search: first reference

'swpruncmd' wapi.lib
'dirchange' wapi.lib
....

faltou linkar com outra lib alem da wapi?

qquer ajuda eu agradeço.

Romeu
Romeu
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 2
Data de registro: 22 Set 2009 22:42
Cidade/Estado: Joinville
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Re: Chamada HTTP para envio de SMS

Mensagempor alxsts » 22 Set 2009 23:45

Olá!

Seja bem-vindo ao forum!

Creio que só vai funcionar se voce linkar com Blinker, ao invés do rTLink.

Por favor, observe a recomendação do Maligno:
"Lembrando os amigos: qualquer dúvida sobre a WAPI, apesar de ser Clipper, usem o tópico dedicado a ela, pra que não fique OFF-TOPIC nesta seção."
[]´s
Alexandre Santos (AlxSts)
alxsts
Colaborador

Colaborador
 
Mensagens: 2943
Data de registro: 12 Ago 2008 15:50
Cidade/Estado: São Paulo-SP-Brasil
Curtiu: 21 vezes
Mens.Curtidas: 248 vezes

Re: Chamada HTTP para envio de SMS

Mensagempor Romeu » 23 Set 2009 13:22

Tenho visto muitas duvidas com relação ao blinker. Prefiro continuar com meu velho e bom rtlink.

Será que a wapi não pode mesmo ser usada com rtlink ?

Em tempo, postei aqui por estar interessado mesmo no assunto deste tópico. :)

Obrigado a quem ajudar.
Romeu
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 2
Data de registro: 22 Set 2009 22:42
Cidade/Estado: Joinville
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Re: Chamada HTTP para envio de SMS

Mensagempor Maligno » 23 Set 2009 13:43

Pode usar o RTLink sem problema. Vai aparecer um erro de link-time, pois há uma chamada à função SwpRunCmd(). Basta ignorar esse erro. Em run-time não haverá erro algum, porque a função que executa a linha de comando tem uma checagem de erro, que sentindo a falta de SwpTunCmd(), acabará usando o velho comando RUN.

Mas a biblioteca CATools, infelizmente, ainda não deu pra dispensar. Você precisará dela (é o tal erro que fala sobre "dirchange").
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar de usuário

Maligno
Membro Master

Membro Master
 
Mensagens: 6390
Data de registro: 06 Jul 2004 01:40
Cidade/Estado: Londrina/PR
Curtiu: 1 vez
Mens.Curtidas: 14 vezes

Chamada HTTP para envio de SMS

Mensagempor Mário Isa » 20 Out 2011 06:39

Bom dia!
Há muito tempo atrás vi este tópico, fiz o cadastro no site fastsms.

Ocorre que logo ao fazer já não enviava prá claro.
Toda hora aparece uma mensagem q diz q vai resolver e já faz quase um ano e nada.

Agora não envia prá VIVO

Só prá TIM e OI pelo jeito.

Alguém sabe de um outro serviço ?

Mário
Avatar de usuário

Mário Isa
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 902
Data de registro: 07 Jul 2004 13:54
Cidade/Estado: Ilha Solteira-sp
Curtiu: 5 vezes
Mens.Curtidas: 8 vezes

Chamada HTTP para envio de SMS

Mensagempor sygecom » 25 Out 2011 06:53

Olá Mario,
Meus clientes usam:
www.byjg.com.br
e
www.comtele.com.br
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonardodemachado@hotmail.com

Faça você também sua doação esse fórum é uma lenda viva: http://www.pctoledo.com.br/doacao
Avatar de usuário

sygecom
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 7006
Data de registro: 21 Jul 2006 10:12
Cidade/Estado: Alvorada-RS
Curtiu: 1 vez
Mens.Curtidas: 130 vezes

Chamada HTTP para envio de SMS

Mensagempor ANDRIL » 25 Out 2011 15:42

Leonardo, tambem estou precisando do serviço, porem estes links fornecem apenas pacotes para grande volume de SMS, procuro algo nao tão estravagante, apenas para os usuários do sistema, para comunicar seus clientes sobre alguma ocorrencia e nao fazer propaganda ou algo do genero.

Acho que deveria ter pacotes mais acessiveis..., na empresa fastsms tinha, mais pelo jeito para operadoras restritas.

Em tempo, aqui na empresa estamos projetando justamente este serviço (disponibiliza-lo) mais nao so para nos, abrangendo o cliente final, como estes sites citados (podera enviar via aplicativo do desenvolvedor, ou via site que criaremos) gostaria de saber se haveria interesse neste serviço, fornecendo-os com mais opcoes de pacotes, para adequar a necessidade de cada um, alem de enviar para a maioria das operadoras moveis.

Vejam que isso é um projeto apenas, dependendo do interesse, ponho pilha nisso aqui para agilizar o processo.

Ate+
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
Avatar de usuário

ANDRIL
Usuário Nível 5

Usuário Nível 5
 
Mensagens: 1270
Data de registro: 06 Jul 2004 00:44
Curtiu: 12 vezes
Mens.Curtidas: 46 vezes

Chamada HTTP para envio de SMS

Mensagempor sygecom » 25 Out 2011 16:08

Olá Andril,

Eu particularmente estou usando os dois que citei pelo meu sistemas, mas é sempre bom ter opções a mais, e sempre tem gente interessada pela internet a fora em planos mais em conta, se você resolver fazer algo para integrar com aplicativos(web service) quem sabe o povo se anima. boa sorte.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
leonardodemachado@hotmail.com

Faça você também sua doação esse fórum é uma lenda viva: http://www.pctoledo.com.br/doacao
Avatar de usuário

sygecom
Usuário Nível 7

Usuário Nível 7
 
Mensagens: 7006
Data de registro: 21 Jul 2006 10:12
Cidade/Estado: Alvorada-RS
Curtiu: 1 vez
Mens.Curtidas: 130 vezes

Chamada HTTP para envio de SMS

Mensagempor ANDRIL » 25 Out 2011 16:33

Leonardo, iniciamente a ideia é passar os dados via query string, atraves de um endereço que será fornecido. O mesmo procedimento da empresa "fastSMS".

Ate+
Avatar de usuário

ANDRIL
Usuário Nível 5

Usuário Nível 5
 
Mensagens: 1270
Data de registro: 06 Jul 2004 00:44
Curtiu: 12 vezes
Mens.Curtidas: 46 vezes

Próximo



Retornar para CA-Clipper

Quem está online

Usuários vendo este fórum: Google [Bot] e 6 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro