This statement:
SET VAR vAttachments = ('Attachments:'+.vattach1+.vattach2)
is going to smash your filenames together with no delimiter between them.
Not sure what the plugins wants, but probably a comma or a semi color or at
least a space between multiple attachments.
Karen
> I have a program which attaches a pdf to an email and sends the email.
>
> When I try to attach more than 1 attachment, the email fails.
>
> Here is the code I use;
>
> set v vfile1 text='File1.pdf'
> set v vfile2 text='File2.pdf'
> SET VAR vQuote TEXT = NULL
> SET VAR vQuote = (CVAL('QUOTES'))
> SET VAR vDummy TEXT = 'vDummy'
> SET VAR vPipe TEXT = NULL
> SET VAR vPipe = '|'
> SET VAR vTo TEXT = NULL
> SET VAR vSubject TEXT = NULL
> SET VAR vCc TEXT = NULL
> SET VAR vBcc TEXT = NULL
> SET VAR vBody TEXT = NULL
> SET VAR vAttachments TEXT = NULL
> SET VAR vSendDirect TEXT = NULL
> SET VAR vParameters TEXT = NULL
> SET VAR vCLemail text=null
> set v vCLemail='[email protected]'
>
> SET VAR vBody text= +
> (' '+(CHAR(009))&'Attached is your information for the '+(CHAR(013))+ +
> ' '+(CHAR(009))&'year. Please review and forward to your '+(CHAR(013))+
> +
> ' '+(CHAR(009))&'tax consultant. '+(CHAR(013))+
> +
> ' '+(CHAR(009))&' '+(CHAR(013))+
> +
> ' '+(CHAR(009))&'Should you have any questions, please call.'+(CHAR(013)))
> SET VAR vTo = ('To:'+.vCLEmail)
> SET VAR vSubject = ('Information for'+(ctxt(.vyear)))
> SET VAR vCc = 'CC: '
> SET VAR vBcc TEXT = 'Bcc: '
> SET VAR vBody TEXT = ('Body:'+.vBody)
> set v vattach1 text=((CVAL('CURRDIR'))+'\'+.vFile1)
> set v vattach2 text=((CVAL('CURRDIR'))+'\'+.vFile2)
>
> SET VAR vAttachments = ('Attachments:'+.vattach1+.vattach2)
>
> SET VAR vSendDirect = 'SendDirect:TRUE'
>
> SET VAR vParameters = +
> (.vQuote+.vDummy&.vPipe+.vTo&.vPipe+.vSubject&.vPipe+.vCc&.vPipe+.vBcc&.vpip
> e +
> +.vBody&+.vPipe+.vAttachments&.vPipe+.vSendDirect)
>
> PLUGIN MAPIMail4.RBL &vParameters
>
>
> Can anyone see where the code goes wrong ?
