Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

OT: Ejecutar Programa al recibir correo en Microsoft Outlook

230 views
Skip to first unread message

Félix Berto Castillo G.

unread,
May 16, 2010, 9:56:07 PM5/16/10
to
Saludos a Todos!

�Existe alguna forma de que, al recibir un correo en Microsoft Outlook, se
pueda enviar esa informaci�n a una aplicaci�n?

Ejemplo:

*** Si este fuera el correo ***
De: cue...@servidor.com
A: cue...@servidor.com
Asunto: Activar cliente
Detalles:{
C�digo: 000001
T�cnico: P-16
}
*** Fin del correo ***

Es como que quisiera poder enviar esa informacion a un programa hecho en VFP
y que luego el programa pueda HACER ALGO cada vez que un t�cnico env�e un
correo a una cuenta espec�fica y registrar inmediatamente "algo" en base al
correo recibido.

DENME ESPERANZAS!

*-*-*-*-*-*-*-*-*
F�lix Berto Castillo G.
La Vega, Rep. Dom.
*-*-*-*-*-*-*-*-*


Félix Berto Castillo G.

unread,
May 16, 2010, 9:59:47 PM5/16/10
to
Disculpas!

Se me olvid� algo DEMASIADO Importante:

Por favor, y gracias de antemano.

(Es que en mi pa�s estamos de elecciones municipales y la tensi�n est� al
l�mite!)

--

*-*-*-*-*-*-*-*-*
F�lix Berto Castillo G.
La Vega, Rep. Dom.
*-*-*-*-*-*-*-*-*


"F�lix Berto Castillo G." <felixbcastillo AT codetel.net.do> wrote in
message news:uopVeQW9...@TK2MSFTNGP05.phx.gbl...

Carlos Omar Figueroa L�pez

unread,
May 17, 2010, 1:41:54 AM5/17/10
to
F�lix quiz�s sea m�s conveniente que este tipo de aplicaci�n no la bases en
un correo electr�nico
sino directamente en Sockets, en PortalFOX hay por ah� unos ejemplos creo
que de un chat, pero
es el mismo principio.


--
Que est�s bien.
=====================================
Desarrollos EfiMax
Ing. Carlos Omar Figueroa L�pez
Web: http://www.efimax.com.mx
Hermosillo,Sonora
=====================================


"F�lix Berto Castillo G." <felixbcastillo AT codetel.net.do> escribi� en el
mensaje news:uopVeQW9...@TK2MSFTNGP05.phx.gbl...

Félix Berto Castillo G.

unread,
May 17, 2010, 2:51:54 AM5/17/10
to
Mira lo que pasa Carlos:

Tengo un cliente con un sistema de servicios donde los tecnicos estan en las
calles, todos tienen celulares BlackBerrys, lo que permitiria que ellos (los
tecnicos) puedan enviar correos electronicos. Yo podria sacar provecho de
este tecnologia si ellos envian (bajo un formato especifico) datos para
registrar el estado de los trabajos que salen a realizar:

Orden de Servicio: <Tecnico>,<Numero de Orden>,<Estado:
I:Iniciada,T:Terminada;S:Suspendida>
Supervision: <Tecnico>,<Codigo Cliente>,<Tipo de Orden a Generar>
Mensajero: <Mensajero>,<Cliente>,<Estado: E:Entregado,X:Direccion no
localizada>

En fin, con ellos en las calles, y aprovechando la tecnologia, no habria que
esperar que ellos llegaran a la localidad para que la encargada de servicios
actualice todo el trabajo que ellos realizan.

Ahora bien, quizas no entiendo si con los Sockets yo podria aprovechar lo
que tengo actualmente.
�Con Sockets puedo capturar el correo que se recibiria de los celulares? No,
solo trafico por la red (pero ellos estan en otra localidad)
�Con los BlackBerrys podria conectarme mediante Terminal Server? Si se
puede, entonces si podria aprovechar la tecnologia.

Gracias de nuevo y AUN CON ESPERANZAS!

--

*-*-*-*-*-*-*-*-*
F�lix Berto Castillo G.
La Vega, Rep. Dom.
*-*-*-*-*-*-*-*-*

"Carlos Omar Figueroa L�pez" <webm...@efimax.com.mx> wrote in message
news:hsql2t$q5r$1...@speranza.aioe.org...

Carlos Omar Figueroa L�pez

unread,
May 17, 2010, 5:18:14 AM5/17/10
to
Toda comunicaci�n por Internet se resume a sockets.

Si puedes recibir (aunque yo no lo he hecho) recibir directamente desde tu
aplicaci�n el correo electr�nico, te recomiendo ampliamente las clases de
Pablo Pioli, que aunque hace bastante tiempo no ha actualizado los
componentes trabajan apropiadamente bajo TCP/IP4 y tiene una clase dedicada
al correo electr�nico por lo que ser� mucho m�s f�cil para ti recibir el
correo desde tu aplicaci�n directamente con el componente sin tener que
bajarte a programar a nivel sockets.

Blackberry no soportaba componentes para conexiones terminal lo ultima vez
que vi, los Iphone si.

la direcci�n es:

http://www.coliseosoftware.com.ar/ifox/espanol/default.asp

El componente que requieres es el iFox.POP3

--
Que est�s bien.
=====================================
Desarrollos EfiMax
Ing. Carlos Omar Figueroa L�pez
Web: http://www.efimax.com.mx
Hermosillo,Sonora
=====================================


"F�lix Berto Castillo G." <felixbcastillo AT codetel.net.do> escribi� en el

mensaje news:OxWYw1Y9...@TK2MSFTNGP04.phx.gbl...

josepe

unread,
May 17, 2010, 12:10:53 PM5/17/10
to
Pues talvez si usas una rutina VFP para enviar y recibir correo en vez
de Outlook. Sobre eso hay mucho material disponible.

Félix Berto Castillo G.

unread,
May 18, 2010, 10:43:56 PM5/18/10
to
Saludos a todos de nuevo!

Aun no he decidido por cual herramienta, pero optare por leer desde VFP el
correo POP3, no lo habia pensado, y, definitivamente me parece la solucion
OPTIMA!

Gracias josepe y Carlos Omar, gracias a todos!

--

*-*-*-*-*-*-*-*-*
F�lix Berto Castillo G.
La Vega, Rep. Dom.
*-*-*-*-*-*-*-*-*

"F�lix Berto Castillo G." <felixbcastillo AT codetel.net.do> wrote in
message news:uopVeQW9...@TK2MSFTNGP05.phx.gbl...

mario alfredo

unread,
May 21, 2010, 7:11:01 PM5/21/10
to
Cusrname='mico...@hotmail.com' && sive para utilizar el correo
Cpasw='xxxxxxx'

Cenvio='mico...@hotmail.com' && quien lo envia
Cdestino='correo...@hotmail.com' && destino quien lo recibe

Csubject='hola como estas'
Ctextbody='hola como estas'
Cadjunto=''

LOCAL lcSchema, loConfig, loMsg, loError, lcErr
lcErr = ""
lcSchema = "http://schemas.microsoft.com/cdo/configuration/"
loConfig = CREATEOBJECT("CDO.Configuration")
WITH loConfig.FIELDS
.ITEM(lcSchema + "smtpserver") = "smtp.live.com"
.ITEM(lcSchema + "smtpserverport") = 25
.ITEM(lcSchema + "sendusing") = 2
.ITEM(lcSchema + "smtpauthenticate") = .T.
.ITEM(lcSchema + "smtpusessl") = .T.
.ITEM(lcSchema + "sendusername") = Cusrname
.ITEM(lcSchema + "sendpassword") = Cpasw
.UPDATE
ENDWITH
loMsg = CREATEOBJECT ("CDO.Message")
WITH loMsg
.Configuration = loConfig
.FROM = Cenvio &&<correo de salida>"
.TO = Cdestino &&"<correo de destino>"
.Subject = Csubject
.TextBody = Ctextbody
.AddAttachment(Cadjunto) &&("<adjunto>")
.Send()
ENDWITH
Release loConfig, loMsg
STORE .NULL. TO loConfig, loMsg
IF EMPTY(lcErr)
*MESSAGEBOX("El mensaje se envió con éxito para el Proveedor " +
allt(selprov.nomprv), 64, titulo)
MESSAGEBOX("El mensaje se envió con éxito para el Proveedor ")
ELSE
MESSAGEBOX(lcErr, 16 , "Error")
ENDIF

Félix Berto Castillo G.

unread,
May 22, 2010, 1:24:01 AM5/22/10
to
Gracias Mario, pero mi deseo es recibir correos, no enviarlos.

--

*-*-*-*-*-*-*-*-*
F�lix Berto Castillo G.
La Vega, Rep. Dom.
*-*-*-*-*-*-*-*-*

"mario alfredo" <maov...@hotmail.com> wrote in message
news:a70758f1-c32e-4896...@v18g2000vbc.googlegroups.com...

*MESSAGEBOX("El mensaje se envi� con �xito para el Proveedor " +
allt(selprov.nomprv), 64, titulo)
MESSAGEBOX("El mensaje se envi� con �xito para el Proveedor ")

0 new messages