Abra el cliente de correo electrónico predeterminado utilizando el archivo .Vbs
Posible duplicado:
Enviar correo electrónico a través de VBA
Enviar correo electrónico desde Excel en el entorno de Exchange
Tengo esto hasta ahora
Dim objOutl
Set objOutl = CreateObject("Outlook.Application")
Set objMailItem = objOutl.CreateItem(olMailItem)
objMailItem.Display
strEmailAddr = "[email protected]"
objMailItem.Recipients.Add strEmailAddr
objMailItem.Body = "Hi"
objMailItem.Attachments.Add "access.xml"
Set objMailItem = nothing
Set objOutl = nothing
¡Funciona! Pero solo en las computadoras que tienen Outlook. ¿Cómo puedo hacer que esto funcione con computadoras que tienen Windows Live?