FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour SMS desde FW
Posts: 219
Joined: Mon Dec 26, 2005 07:25 PM
SMS desde FW
Posted: Sun Jan 21, 2007 10:57 AM

¿Sabe alguien si se puede mandar un SMS desde un porgrama echo con FW?

Si alguien supiera que es imposible, también me gustaría saberlo.

Muchas gracias. Saludos.

Nos Gusta Programar
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
SMS desde FW
Posted: Mon Jan 22, 2007 09:59 PM

Manu
En el foro de fw español en yahoo hay algunas respuestas sobre sms y parecen muy fáciles
saludos

Posts: 310
Joined: Sun Jan 08, 2006 10:09 PM
SMS desde FW
Posted: Mon Jan 22, 2007 11:09 PM
The SMS es lo mismo que un email

Consiste:

numero_del_telefono@operadora.com

Ejemplo:

8765-3488@claro.com
Posts: 33
Joined: Thu Aug 24, 2006 03:14 AM
Programa para enviar con sockets por jikama.com
Posted: Tue Jun 12, 2007 11:45 AM
  • ivizcaino 2007
  • smsSock('000001','PASSWD','5532324028','Hola AMigos')
  • Poner en System\smsSock.bwp
    FUNCTION SMSSock()
    PARAM cCliente,cPassword,cTelefono,cMensaje
    cDominio:='www.jikama.com'
    oSMS := TWebClient():New(6207)
    Cargo := .f.
    cTexto:=''
    oSMS:bOnConnect := {|oWClient| Cargo := .t.}
    oSMS:bOnRead := {|cData| if(valtype(cData) == "C", cTexto := cTexto+cData, )}
    oSMSSock:=oSMS:oSocket
    oSMS:Connect('www.jikama.com')
    while ! Cargo
    syswait(.1)
    SysRefresh()
    endw
    oSMSSock:SendData( [:BACK cw:Jsms("]+ccliente+[","]+cPassword+[","]+cTelefono+[","]+cMensaje+[")])
    While Empty(cTexto)
    syswait(.1)
    m6(time())
    Endw
    oSMSSock:end()
    Mensaje(1,cTexto)
    return (cTexto)

Este ejemplo es con Sockets!

smsSock('000001','eureka','5532324028','Hola Amigos por sockets 6207 !'+Time())

Posts: 990
Joined: Thu Nov 17, 2005 05:49 PM
SMS desde FW
Posted: Fri Aug 31, 2007 10:03 PM

CresWinMan;

¿Parece que tu ejemplo usa un servicio prepagado?

¿Se necesita un username y un password?

Reinaldo.

Posts: 840
Joined: Thu Oct 13, 2005 07:05 PM
SMS desde FW
Posted: Sat Sep 01, 2007 01:20 AM

Si revisan mi blog, encontrarán un articulo sobre el envio de SMS con xHarbour, cualquier plataforma, desde aplicaciones en modo consola hasta aplicaciones GUI con interfaz gráfica como FiveWin.

Código fuente incluido.

Saludos

R.F.
Posts: 990
Joined: Thu Nov 17, 2005 05:49 PM
SMS desde FW
Posted: Sat Sep 01, 2007 03:17 PM

René;

Gracias por la información. Miré el blog. Muy útil.

Parece que el servicio que usas para el ejemplo que brindas solo funciona en Méjico. Me pregunto que otras alternativas existen que funcionen aca.

Tienes que decirme cuando vuelves por Miami y que tengas un rato corto para verte y conversar. Y si no, pues voy a tener que viajar a Méjico o España y asistir a uno de tus cursos.

Reinaldo.

Posts: 840
Joined: Thu Oct 13, 2005 07:05 PM
SMS desde FW
Posted: Sat Sep 01, 2007 03:46 PM

Reinado.

El servicio www.jikama.com funciona en todo el mundo, es como Skype, compras crédito y listo, envias desde cualquier parte del mundo hasta cualquier parte del mundo.

Saludos

R.F.
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
SMS desde FW
Posted: Sun Dec 09, 2007 02:37 PM

Y no seria posible mandar SMSs con un movil conectado al PC.
Con comandos HAYES de modem se podria ¿ no ?

Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013

Continue the discussion