Walter Ojeda: ayuda leer mails desde fox

[Eric Natareno Guerra]

HOla Walter, estuve probando un formulario que enviaste ya hace rato sobre como recibir correos desde fox pero siempre me da error de conexion, ya registre ospop3.dll e ingrese los parametros como aparece en la imagen, tambien probé con puerto 465 pero nada, que podrá ser. por tu ayuda muchas gracias.

[edgar suarez kummers]

Buenas Eric:

Ojalá con la ayuda de Walter consigas que te funcione la lectura de correos.

A mí casi me cuesta la ex-comunión el pretender leer correos a través de los consejos y formularios y *.dll y demás.

Estoy expectante de ver los resultados de tu consulta.

suerte

edgar

El 18 de febrero de 2012 00:59, Eric Natareno Guerra <tqany...@gmail.com> escribió:

HOla Walter, estuve probando un formulario que enviaste ya hace rato sobre como recibir correos desde fox pero siempre me da error de conexion, ya registre ospop3.dll e ingrese los parametros como aparece en la imagen, tambien probé con puerto 465 pero nada, que podrá ser. por tu ayuda muchas gracias.

--
edgar suarez kummers

[Eric Natareno Guerra]

Gracias por tus comentarios Edgar, yo también espero la ayuda de Walter

[Luis Maria Guayan]

No es bueno hacer una pregunta a un solo integrante del grupo, muchos que pueden saber la respuesta, no te contestarán la pregunta.

Por lo que se ve en la imagen, el puerto POP3 de Gmail no es el 110, y Gmail utiliza seguridad en la capa de transporte (en tu formulario no se ve esa opción)

Mira este pequeño ejemplo con librería OstroSoft POP3 que envié hace unas semanas y funciona con una cuenta de Gmail:


LOCAL loS AS "OSPOP3_Plus.Session"
LOCAL loH AS "OSPOP3_Plus.Headers"

loS = CREATEOBJECT("OSPOP3_Plus.Session")
loS.SERVERNAME = "pop.gmail.com"
loS.Login = "port...@gmail.com"
loS.PASSWORD = "password"
loS.PortNumber = "995"
loS.UseSSL = .T.

IF loS.OpenPOP3()
  CLEAR
  ? loS.GetMessageCount(), "Mensajes"
  FOR lnI = 1 TO loS.MessageCount
    loH = loS.GetMessageHeaders(lnI)
    ? TRANSFORM(lnI) + " - " + loH.Sender.NAME + " <" + loH.Sender.Address + ">"
    ? " --- Fecha:" + loH.DateSent
    ? " --- Tema:" + loH.Subject
  ENDFOR
  loS.ClosePOP3()
ELSE
  MESSAGEBOX("NO SE CONECTO", 0+16, "Error")
ENDIF

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Eric Natareno Guerra]

Gracias Luis Maria, el porque pregunté especificamente a Walter es porque la imagen del formulario que pegué pertenece a él y por ende pensé que tendria la respuesta, pero gracias por responder. Una pregunta mas, en donde obtengo la libreria  OSPOP3_Plus, es gratis o de pago?

[Luis Maria Guayan]

La puedes descargar de estos ejemplos con VB y allí esta la librería

http://www.ostrosoft.com/POP3_component.asp

Sobre la licencia:

Licensing

Non-commercial license (free)       
Unlimited usage for developing non-commercial applications.

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[Eric Natareno Guerra]

Muchisimas gracias Luis Maria, ya lo probé y funciona muy bien. Gracias por tu tiempo y todos los conocimientos que compartes.