Aug 22
Puedes enviar emails a través de OutLook (No OutLook express) de forma sencilla a través de automatización.
oOutLook = Createobject("Outlook.Application")
oEmail = oOutLook.CreateItem(0)
oEmail.Display
With oEmail
.Recipients.Add("dav_amador@yahoo.com.mx")
.Subject = "Envio de
emails"
.Importance = 1
.Body = "Aquí va el texto del email"
.Attachments.Add("C:RutaMiArchivo1.ext")
.Attachments.Add("C:RutaMiArchivo2.ext")
.Send
EndWith
Release oEmail
Release oOutLook
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com
28 Aug 2008 15:49
Lo pruebo, me sale una pantalla donde dice que estoy accediendo a Outlook y me pide darle SI o No, como puedo evitar esta pregunta?