VFP7 Email Outlook/Exhange

[cj001]

I have a VFP7 email program which works well with OUTLOOK2000.
However when my client runs it nothing happens. My client is using OUTLOOK2000 with EXCHANGE.

Is there anything special I need to know about?

 

[craigsboyd]

cj001,

There is alot of information missing from your post...like what the code is that you are using and what operating system the user is running. I wrote some code that kind of encompasses some of the most popular ways to send email via VFP using different technologies. You can find it here:

Emailling from within VFP
thread1251-797973

_{craig1442@mchsi.com}

"Whom computers would destroy, they must first drive mad." - Anon​

 

[cj001]

Here is the code.

** =================================
** Email in VFP 7
** =================================


LOCAL xTo, xFrom, xSub, xBody, xCC, xCCtype

** =================================
** From is only needed if you aren't
** using the default email address
** in Outlook.
** =================================

USE \x\xsendit\sendlog.dbf
SCAN
xCCtype = 2
oOutlook = createobject ("outlook.application")
oMail = oOutlook.createitem(0)
oMail.to = LGTO
oMail.Subject = LGSubj
oMail.Body = LGBody

** =================================
** Below sends an email automatically
** Mail Delivery tab has 'Send messages
** immediately when connected' checked.
** =================================
oMail.Send()
** =================================
** Below displays an email
** =================================
** oMail.Display
ENDSCAN

 

[Mike Gagnon]

cj001

I'm not sure your suggestion deals with Exchange server which requires a username and password.

Mike Gagnon

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

 

[cj001]

How would I include the user ID and Password?

 

[Mike Gagnon]

cj001

craigboyd has pointed to a thread that shows how to send an e-mail using CDO through an Exchange server.

Mike Gagnon

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