Hello All,
Trying to figure out why this code is not working.
Any Ideas?
Trying to figure out why this code is not working.
Code:
Function SendMail()
Dim outl As outlook.Application
Set outl = New outlook.Application
Dim mi As outlook.MailItem
Set mi = outl.CreateItem(olMailItem)
mi.body = "Hello, blah blah blah"
mi.Subject = "CV_blah"
mi.To = "blah@blah.com"
mi.Send
Set mi = Nothing
Set outl = Nothing
End Function
Any Ideas?