send mails problem

[FILIPM]

Dear Experts,

I have a form in which a have a crystal report in which a make a pdf file.

code is :
oCRApp = CREATEOBJECT("crystalruntime.application&quot
oRep = oCRApp.OpenReport("offerte.rpt&quot
oExport = oRep.Exportoptions()
oExport.Destinationtype = 1
oExport.FormatType = 31
oExport.Diskfilename = "&xxattach"
orep.Export(.F.)
m.xxmail =ALLTRIM(m.ccoemail)
m.xxsubject ="OFFERTE"
m.xxbody="Hierbij zenden wij U de aangevraagde offerte"
DO mailzend
So far no problem

In my prg mailzend is the following code :
cSubject = m.xxsubject
cAddress = m.xxmail
cBody = m.xxbody
cattach=m.xxattach
DO doMail WITH cSubject,cAddress,cBody

**********************************************************
PROCEDURE doMail
PARAMETERS cSubject, cAddress, cBody
o=createobject("outlook.application&quot
oitem=o.createitem(0)
oitem.Attachments.Add("&cattach&quot &&Full path required
oitem.subject= cSubject
oitem.to= cAddress
oitem.body= cBody
oitem.send
o=.null.
RETURN
**********************************************************

so far no problem, but when it start sending I always get te same message from outlook (it is in dutch so i will try to translate)

"A program trys automatically to send e-mails in your name.
Do You want to allow this ?"

Can I avoid to get this message

 

[Mike Gagnon]

FILIPM

This is due to a recent security patch installed to Outlook to prevent viruses to automatically send e-mails without the user's authorisation.
Take a look at faq184-1856 and also faq184-1156.

Mike Gagnon

If you want to get the best response to a question, please check out FAQ184-2483 first.

 

[JRB-Bldr]

In response to the inquiry at the bottom of FAQ184-1156 , I am using Redemption to send emails out via Outlook and bypass the new security message.

My client sends between 50 and 150 emails out daily in an automated manner and Redemption is what is working for them. I have not tried any other approach.

I use both FRX2Word to create MS Word DOC files and the Zan Image Printer (

http://www.zan1011.com/

) for TIFF image file creation and attach them as needed to the email documents.

Good Luck,


JRB-Bldr
VisionQuest Consulting
Business Analyst & CIO Consulting Services
CIOServices@yahoo.com