Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   Enviar SMS (https://www.clubdelphi.com/foros/showthread.php?t=7646)

panque 22-02-2004 03:55:27

Enviar SMS
 
Hola gente de este excelente foro.
Soy de Argentina y me gustaria saber como puedo enviar desde una aplicacion hecha en Delphi un mensaje de texto a un telefono movil (sms).
Ya baje un programa de esta pagina peor me pide un componente de socket
que parece que ya no existe, tambien tengo los componentes Async Pro pero me da error y no me envia nada.
Tengo entendido que a travez de una pagina se puede hacer pero la verdad ni idea .
Por favor ayuda.
Desde ya muchas gracias.

DarkByte 22-02-2004 09:33:13

Qué componente socket te pide exáctamente? ClientSocket?? El de las indy??. Qué delphi usas?

__cadetill 22-02-2004 15:53:10

Creo recordar (si es el que se puede descargar desde esta misma web) que necesitaba un componente de François Piette. Lo que no recuerdo que componentes de este autor eran los necesarios, pero si no recuerdo mal, en la documentación del componente/programa te lo ha de indicar

panque 22-02-2004 20:01:15

sms
 
Este es el componente que me pide

Componentes Socket de Fpiette
Hciste algo similar?

__cadetill 22-02-2004 20:09:32

Quizás son los que hay en esta web
Si no, echale unas búsquedas al maestro Google que salen cantidad de lincs ;)

xio 02-10-2007 14:00:35

Yo estoy en la misma situacion, se que ha pasado bastante tiempo pero si alguien puede ayudarme con esto se lo agradeceria bastante. Utilizo delphi 4 y no tengo ni idea de como empezar la aplicacion, no he conseguido ningun componente ni ningun ejemplo.

Un saludo!:(

xio 02-10-2007 20:06:47

A ver no se si voy en el camino correcto, pero voy encontrando cositas, solo necesito un poco de ayuda. Os comento he encontrado una aplicacion que supuestamente (aun no he conseguido que funcione) sirve para enviar sms a través de delphi, http://www.torry.net/vcl/comms/cellular/d2gsms.zip. Esa es la aplicacion, hay que instalar el componente D2Gsms.pas y al instalarlo nos da un error diciendo que no tenemos el componente WSocket, por lo que tenemos que pinchar en el siguente enlace, http://users.pandora.be/dirk.claesse...ads/ontime.zip, y descargarlo, una vez instalados los dos, NO TENGO NI IDEA de como utilizarlo.

Cuestiones, tenemos que tener un servidor para poder enviar sms, y como no un usuario y contraseña....

Por hoy ya es suficiente para mi, lo dejo en vuestras manos. :confused:

Hasta mañana. ;)

PD: No olvideis que utilizo Delphi 4.

rolandoj 02-10-2007 23:00:52

la clave parece ser www.genie.co.uk. y el teléfono
 
Cita:

Empezado por xio (Mensaje 235634)
A ver no se si voy en el camino correcto, pero voy encontrando cositas, solo necesito un poco de ayuda. Os comento he encontrado una aplicacion que supuestamente (aun no he conseguido que funcione) sirve para enviar sms a través de delphi, http://www.torry.net/vcl/comms/cellular/d2gsms.zip. Esa es la aplicacion, hay que instalar el componente D2Gsms.pas y al instalarlo nos da un error diciendo que no tenemos el componente WSocket, por lo que tenemos que pinchar en el siguente enlace, http://users.pandora.be/dirk.claesse...ads/ontime.zip, y descargarlo, una vez instalados los dos, NO TENGO NI IDEA de como utilizarlo.

Cuestiones, tenemos que tener un servidor para poder enviar sms, y como no un usuario y contraseña....

Por hoy ya es suficiente para mi, lo dejo en vuestras manos. :confused:

Hasta mañana. ;)

PD: No olvideis que utilizo Delphi 4.

Hola xio,

No estoy en casa, así que no puedo probarlos; pero revisando el código, se están usando los servicios del sitio web www.genie.co.uk. Entrando a esa página con tú navegador Web verás a mano izquierda, en la sección "See what you can do", un enlace a "Send a free text message"; es ese servicio el que el componente invoca desde Delphi 4. Si entras por ese enlace te pedira que te registres y es ese usuario y password el que debes suministrar al componente. En ese orden de ideas, parece muy simple. Asumiendo que en form1 colocaste un componente TD2Gsms llamado ElMensaje, el código sería algo como:

Código Delphi [-]
Procedure TForm1.Enviar(ATelephone,ASubject,AMessage:String);
Begin
     ElMensaje.Username     := 'miusuario';
     ElMensaje.Password     := 'miclave';
     ElMensaje.MobileNumber := ATelephone;
     ElMensaje.Subject      := ASubject;
     ElMensaje.MessageText  := AMessage;
     ElMensaje.Send;
End;

Ahora bien, la página dice que aplica para cualquier movil en cualquier red. No sé mucho del tema; pero de ser así, pienso que la clave estará en la forma de indicar el teléfono en cuestión.

Suerte

rolandoj 02-10-2007 23:24:53

Algo que olvidé
 
Hola xio,

Algo que olvidé mencionar es que el código del método SEND es muy específico del sitio web www.genie.co.uk; es decir, no se trata solo del host. Si lo de poder enviar a cualquier red no es tan cierto (y lo más probable es que aplique solo para Gran Bretaña), se deberá modificar el método SEND para permitir parametrización (como mínimo poder cambiar de servidor) y se debe averiguar la aplicación específica de ese sitio que te brinde el servicio, junto con sus parámetros

Suerte

xio 03-10-2007 11:57:50

:confused::confused::confused:

Cada vez voy a peor. No me aclaro he encontrado un programita que sirve para enviar SMS gratris, colgaron el codigo funte en el foro para que le sirviera de ayuda a la gente, y como no los componentes pero me da un error al compilar, me dice que la SSLComponent.pas no la encuentra.

Cuelgo los enlaces:

Codigo fuente WinSMS:
http://www.arrakis.es/~paixon/source...rce.untidy.zip

Componentes:
http://www.arrakis.es/~paixon/source/SSLComponent.zip

No se por donde tirar estoy perdida, espero me echeis una mano.

Un saludo!

IVAND 20-05-2010 23:47:03

Estimados amigos

Estoy en una posición igual a ustedes , pero ya pude lograr enviar el sms desde delphi a travez de un módem sony ericcson , utilizando los async pro v4(x)
, tengo algunas dudas de errores q envía el componente , alguien de ustedes sabe como tratar esos errores, me refiero a q significa cada uno de ellos Ej 8101
8103 , por ejemplo cuando pasa de 120 caracteres el mensaje me da un error de 8101 y ya se cuelga y no deja enviar , si ha alguien le sirve puedo pasarle un pequeño ejemplo ,

Gracias

xio 21-05-2010 09:43:00

Siento decirte que no puedo ayudarte. No tengo ni idea sobre ese tema, yo al final lo implemente con una compañia que envia sms a traves de web...

Un saludo.


La franja horaria es GMT +2. Ahora son las 03:49:56.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi