Hi everyone,

We're using GroupWise here at work on all workstations. We have two servers: Development server (Nowell) and "Live" server (NT). We implemented Nigel Coates class for sending mails. All data, output files and applications reside on server. When we send mails with attachment accessing Novell (Development) server from workstation, everything works fine. However, when we try to send files from NT server, the files arrive either without attachment, or with attachment showed incorrectly (Part1 instead of real name and extension). Both systems work fine with Outlook Express. I also tried to send files directly from my workstation and attach files from Live server, and it worked just fine.

Therefore the problem lies in sending files through VFP. Did someone have the similar problems and can share a solution?

Here is the test program, I tried:

?sendmails(,,"Nosonovsky","Sending Mails from VFP",;
"ONE MORE TRY. See, if you get an attachment. "+ ;
"This is a test message... If you receive it, it means, this class actually works.", ;
"o:\redp\output\customer\cmls\pr32BWTR.PDF")

*********************************************************************************
*  Description.......: SendMails - automatically sends mails with attachments 
*  Calling Samples...: ?sendmails(,,"Nosonovsky;Lovins;Pasnik;Geiss","Sending Mails from VFP","This is a test message... If you receive it, it means, this class actually works.","g:\redp\appl\OutputModule\Classes\Fox.reg")
*  Parameter List....: pcUserName, pcPassword, pcRecepients, pcSubject, pcBodyText,pcAttachments, plReceipt, plShowClient, plFetch
*  Created by........: Nadya Nosonovsky 07/19/2000 12:31:39 PM 
*  Modified by.......: 
**************************************************************************************************************
lparameters pcUserName, pcPassword, pcRecepients, pcSubject, pcBodyText,pcAttachments, plReceipt, plShowClient, plFetch
local loMail, lnReturn
loMail=newobject('cusmapi','mapimail.vcx')
lnReturn=loMail.SendMail(pcUserName, pcPassword, pcRecepients, pcSubject, pcBodyText,pcAttachments, plReceipt, plShowClient, plFetch)
return lnReturn