Recuperar Emails con CDO - VB-MUNDO

pemorip · #1 (**permalink**) 02-07-2005, 07:23:16

Estoy intentado hacer una aplicación que recupere mi correo electrónico.
La información la he obtenido de la siguiente página de Microsoft:

http://support.microsoft.com/?scid=kb;es;314383

Utilizo las bibliotecas;

* Microsoft CDO for Exchange 2000
* Microsoft ActiveX Data Objects 2.5

Hay una parte del código que no entiendo bien, es la que a continuación trascribo:

' TODO: Replace with your folder URL
Dim sFdUrl As String
sFdUrl = "http://<ExchServer>/Exchange/<UserAlias>/Inbox"

oCn.Provider = "exoledb.datasource"
oCn.Open(sFdUrl, "", "", -1)

'Fin de TODO

Suponiendo que estos fueran mis datos de mi cuenta:

Servidor POP: pop3.wanadoo.es
Nombre de usuario: pemorip@wanadoo
Contraseña: 5555
Correo: pemorip@wanadoo.es

¿Cómo se completarían las líneas?
sFdUrl ="http://<ExchServer>/Exchange/<UserAlias>/Inbox"
oCn.Open(sFdUrl, "", "", -1)

Gracias.

acalanto · #2 (**permalink**) 02-07-2005, 07:56:08

El artículo hace referencia a descargar correos de Microsoft Exchange, es decir, el servidor de correo que incorpora Windows NT (En cualquiera de sus versiones).

En principio Exchange Server es el encargado de descargar el correo de tu cuenta en la dirección que manifiestas y entregarlo a cada usuario en su equipo y en sus respectivas carpetas.

Si lo que deseas es descargar el correo desde el servidor y cuenta indicadas, necesitas utilizar sockets o algún control que te permita establecer comunicación con el servidor POP3 deseado.

pemorip · #3 (**permalink**) 02-07-2005, 08:35:45

Gracias miraré los sockets

Un saludo

pemorip · #4 (**permalink**) 02-07-2005, 11:26:35

Alguien puede pasarme información de como recuperar mis mensajes de correo electronico sin utilizar Outlook?

Gracias