¿Porque usas OCXs de terceros?
Puedes emplear la DLL CDO, viene integrada en Windows 2000 y posterior.
Ejemplo:
Dim mCorreo As New CDO.Message
mCorreo.To = "
[email protected]"
mCorreo.CC = "
[email protected]"
mCorreo.From = "
[email protected]"
mCorreo.Subject = "Asunto de prueba"
mCorreo.HTMLBody = "<strong>Texto del correo en formato Html</strong>"
mCorreo.AddAttachment "ruta a archivo adjunto"
mCorreo.send