I managed to do it once, but it was under Windows 3.11
with a microsoft mail client, died as soon as people went to windows 95+..... (using the exchange client) dll changed or something... was along time ago....
I only had it basically sending a short e-mail from a users
machine, if they did a job, (for the next person) to then
send the fax & comms to our sites....
Anyway, if your still using Win 3.11 I maybe able to help
I think there was some demo e-mail client written in fox, that I looked at. would have to dig it up......
I wrote my own VB program that my fpw2.6 program could drive with DDE commands.
The VB prog used the standard MS MAPI controls and with combinations of DDEPOKE and DDEXECUTE i gave it the email address, subject line, message body and attachments followed up with a "SEND" command by ddeexecute.
Try Eudora, the program would be:
[tt]
report form xxx to file xxx.tif (assuming you set a tif printdriver as your default printer)
if you have blind faith in your operation system
lnFileNo=fopen("emm.msg",0)
else
lnFileNo=ascmake("emm.msg",0)
endif
=fputs(lnFileNo,"To: "+lower(alltrim(CUSTOMER.EM1_ADDR))+" "
=fputs(lnFileNo,"From: "+lower(alltrim(COMPANY.EMADDRESS))
=fputs(lnFileNo,"Subject: "+alltrim(PROJECTS.PROJECT)
=fputs(lnFileNo,"Cc: "+lower(alltrim(CUSTOMER.EM2_ADDR))+" "
=fputs(lnFileNo,"Bcc: "+lower(alltrim(CUSTOMER.EM3_ADDR))+" "
=fputs(lnFileNo,"Attached: "+xxx.txt+"; "
=fputs(lnFileNo,"X-Attachments: "+xxx.tif+"; "
=fputs(lnFileNo,"" && Warning this must be a null for eudora to read the text
=fputs(lnFileNo,"If You Have Any Questions, Call 888-696-1427 and ask for Dave"
=fclose(lnFileNo)
run /n3 c:\program files\qualcomm\eudora\eudora.exe g:\e_mail\emm.msg
[/tt]
see
See FoxPro Advisor magazine Dec.1996 / Jan.1997 for articles by Tom DeMay on how to send/receive email from Foxpro 2.6 and VFP. If you are sending to a 32-bit email server (such as Microsoft Exchange), I think you have the 16-bit / 32-bit problem for parameters. if you have solved this problem, I would be interested in your solution. I am just now trying to figure out how Foxpro 2.6 can send to Micorsoft Exchange.
Fox Talk magazine for Feb.1996 had an article by Rick Strahl on how to use his CALL32.DLL to 'thunk' the parameters to call Win32 & 32-bit DLLs from 16-bit FoxPro 2.6. But he only deals with accessing the Registry.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.