Visual Basic - COMO MANDAR UN EMAIL

Hola necesito de su ayuda.

Necesito enviar un email a las personas que están dadas de alta en mi base de datos.

Pero tiene que ser automático, o sea, al ejecutarlo tiene que mandar los correos a todos.

gracias por todo.

Hola Raul:
Tengo hecha una aplicación, en la que mando E-Mails a una serie de direcciones de una base de datos ACCESS.
Para ello utilizo los controles MAPISESSION y MAPIMESSAGES.
Parte del codigo es el siguiente:

With MAPIMessages1
.MsgIndex = -1
.SessionID = MAPISession1.SessionID
For i = 1 To wtot_lista
For i2 = i To wtot_email
.RecipIndex = i - 1
.RecipDisplayName = List2.List(i - 1)
.RecipType = "3"
Next
Next
.MsgSubject = text2.Text
.MsgNoteText = MFICHERO
.SessionID = MAPISession1.SessionID
.Send
End With

--------------------
Intenta hacer uno parecido y si tienes problemas dimelo y te mando el programa entero.

Saludos: