Ok, here is my code to send email. However, when this code is executed, I get a pop MS Outlook window asking me to select yes. The message in the window is Program is trying to send e-mail automatically.
How can I stop this window from coming up?
#DEFINE MAILITEM 0
#DEFINE IMPORTANCENORMAL 1
oOutLookObject = CreateObject("Outlook.Application")
oEmailItem = oOutLookObject.CreateItem(MAILITEM)
olByReference = 4
WITH oEmailItem
.Body = "Put Your Message Here"
.to = "
Zachary.Ahmed@conferon.com"
.Subject = "Put Subject here"
.ReadReceiptRequested = .F.
.Importance = IMPORTANCENORMAL
with .Attachments.add("E:\Temp\Test\Completed\Sw_Upload_result-10-10-05.xls", olByReference)
.DisplayName = "Sherwin William Upload"
endwith
.Send
ENDWITH
RELEASE oEmailItem
RELEASE oOutLookObject
thanks