Yo lo hago usando Jmail (www.dimac.net)

Un ejemplo de uso es:

Set mymail = CreateObject("JMail.SMTPMail")
        mymail.ServerAddress = "una dirección de un servidor SMTP"
        mymail.Sender = "dirección del remitente"
        mymail.Subject = "Asunto del mail"
        'mymail.AddRecipient "dirección de un destinatario"
        mymail.AddRecipient "direccion de otro destinatario"
        mymail.Body = "texto del mensaje
        mymail.Priority = 3
        mymail.Execute

le puedes también edjuntar archivos, mira la documentación para más detalles

No se si esto es lo que buscas

    Source: geocities.com/es/ensolva/Descargas/Documentos

               ( geocities.com/es/ensolva/Descargas)                   ( geocities.com/es/ensolva)                   ( geocities.com/es)