ENVIAR MENSAJE A OTRO USUARIO.

[Roberto Matarrita]

Buenas noches compañeros, existe alguna forma en Fox de poder enviarle un mensaje a otro usuario y que este conteste.

 

Gracias.

 

Roberto

Costa Rica.

[ZeRoberto]

WinPopup ActiveX

Saludos

--
btnMyVideo.Click()

[Antonio Meza]

Interesante el winpopup, tienes algún ejemplo desde VFP que quieras compartir Ze Roberto?

saludos

[ZeRoberto]

No lo he probado aun Antonio pero acá te dejo el link http://www.winpopup-express.com/spanish/

--
btnMyVideo.Click()

[ZeRoberto]

Hola tocayo

Lo que se puede hacer es poner en la aplicación un control activex WinSock en modo de escucha Lisnten usando el protocolo UDP para poder usar los nombres de las PC, y otra ventana de envio de mensajes con el WinSock y la lista de maquinas a quienes enviar, entonces se conectan y mensaje recibido se lo muestra en un Messagebox on una Ventana de Chat.

Saludos

--
btnMyVideo.Click()

[ZeRoberto]

Mas información de WinSock

http://msdn.microsoft.com/en-us/library/aa733709(v=vs.60).aspx

--
btnMyVideo.Click()

[Martin´S Consultora Informatica]

Has visto este  ?

http://www.fpress.com/revista/Num0012/articulo.htm

Derrepente te sirve

--
"CIM" Consultoria Informatica Martin´S
--
La información contenida en este mensaje electrónico tiene carácter
CONFIDENCIAL, está dirigida únicamente al destinatario de la misma y
sólo podrá ser usada por éste. Si el lector de este mensaje no es el
destinatario del mismo, se le notifica que cualquier copia o
distribución de éste se encuentra totalmente prohíbida. Si usted ha
recibido este mensaje por error, por favor notifique inmediatamente al
remitente por este mismo medio y borre el mensaje de su sistema.
Gracias.

[ZeRoberto]

Martín ese ejemplo tiene un pequeño detalle solo va a funcionar cliente y servidor, la cosa es hacer que todas las aplicaciones en cualquier estación funcionen como cliente y servidor al mismo tiempo, osea agregarles 2 controles winsock un para Recibir (2002) y otro para Enviar (Puerto 2003) con el Enviar me conecto a cualquier maquina envió el mensaje y luego me desconecto, de esta forma puedo recibir múltiples mensajes de múltiples estaciones sin estar creando nuevas instancias para el winsock como se hacia en VB6.

Saludos

--
btnMyVideo.Click()

[ZeRoberto]

Roberto la otra forma de hacerlo seria por el protocolo TCP pero antes tendrías que registrar el ip por cada usuario de tu sistema que se conecta a la base de datos, así cuando quiere elegir a que usuario enviar el mensaje, obtienes el ip de tu tabla de usuarios.

Saludos

--
btnMyVideo.Click()

[Jorge Blas Diaz Armesto]

Disculpen que meta la cuchara yo tengo un ejemplo utilizando , otro ejemplo de formulario frmhost que se comunicaba con otro formulario llamado remoto todoo en una misma pc con el winsock , que yo hice lo logre distanciar y mandar de una pc a otra un mensaje de texto ida y vuelta  incluso lo logre en una empresa a una distancia de 50 metros , todo el formulario hecho en visual foxpro.

 

Saludos blas

[Alfonso Ramirez Diaz]

También puede ser echo con el mismo foxpro sin usar ningún control winsock o algo externo, se coloca un objeto Timer en el _Screen y posteriormente este consulta una tabla de mensajes cada X segundos y si hay algún mensaje sin leer lo muestre en una pantalla inferior por ejemplo.

[ZeRoberto]

No tengo mas maquinas en red puedes probarlo?

http://www.adrive.com/public/uX2Azg/Winsock.rar

--
btnMyVideo.Click()

[Jorge Blas Diaz Armesto]

Entiendo colega, pero es que mando y me comunico con ese sistema hecho 100% en visual foxpro simultáneamente con 6 pc hasta ahora la cantidad máxima que he probado y la comunicación buenísima y rápida, yo no consulto ninguna tabla colega.

[tomcrux]

Buenas,

en este link existen varios ejemplos e instructivos de como lograr comunicación por chat utilizando winsock en VFP.

Me sirvió mucho cuando supe hacer algo parecido (al ya fuera de vigencia)  Messenger de MSN,  totalmente desarrollado en VFP.

Espero les sirva.

http://www.geocities.ws/dinfantejuarez/mdsockets/index.html

Saludos desde

Córdoba, Argentina.

Tomas Cruz.

[Jorge Blas Diaz Armesto]

Como no colega , a sus ordenes