Looks handy enough, though I don't use RMail, but here is an example of
where you "should" use an ampersand variable:
IF vEmailAttachment IS NOT NULL THEN
SET VAR vEAttach = ('V1|ADD_ATTACHMENT ' + .vEmailAttachment)
PLUGIN RMail .vEAttach {change to ampersand}
ENDIF
For my money, I would have used:
SET VAR vEAttach = ('PLUGIN RMail V1|ADD_ATTACHMENT' & .vEmailAttachment)
&vEAttach
> -----Original Message-----
> From: [email protected] [mailto:[email protected]] On Behalf Of Karen
> Tellef
> Sent: Saturday, January 25, 2014 3:48 PM
> To: RBASE-L Mailing List
> Subject: [RBASE-L] - Re: RMail 9.5
>
> In case you or anyone else is interested, I wanted to set up an RMail
> subroutine that could be called from many places, passing in whatever
> variables I need. So far this is very simple. I plan on also adding
> CC and BCC addresses and to use the Load_From_File parameter too. Feel
> free to use this!
>
> Karen
>
> -- RMailSend.mac
> -- PASS IN VARIABLES:
> -- vEmailTo
> -- vEmailSubject
> -- vEMailMessage
> -- vEMailAttachment (optional)
>
> SET VAR vETo = ('V1|ADD_RECIPIENT' & .vEmailTo)
> SET VAR vESubject = ('V1|SUBJECT' & .vEMailSubject) SET VAR vEMessage =
> ('V1|ADD_TO_MESSAGE_BODY' & .vEmailMessage) SET VAR vEMailAttachment
> TEXT
>
> SET VAR v1 TEXT = NULL
> PLUGIN RMail v1|SHOW LOG
> PLUGIN RMail v1|CLEAR LOG
> PLUGIN RMail v1|CLEAR_ALL
> PLUGIN RMail v1|SHOW PROGRESS
> PLUGIN RMail v1|WAIT 1000
> PLUGIN RMail v1|SHOW LOG
> PLUGIN RMail v1|MESSAGE_TYPE TEXT
> PLUGIN RMail v1|ACCOUNT_NAME NoAuthent
> PLUGIN RMail v1|SENDER_INFO_TEXT "Admin" <[email protected]> PLUGIN
> RMail v1|ADD_REPLY_TO [email protected] PLUGIN RMail .vETo PLUGIN
> RMail .vESubject PLUGIN RMail .vEMessage IF vEmailAttachment IS NOT
> NULL THEN
> SET VAR vEAttach = ('V1|ADD_ATTACHMENT ' + .vEmailAttachment)
> PLUGIN RMail .vEAttach
> ENDIF
> PLUGIN RMail v1|SEND
>
> IF v1 <> 'OK' OR v1 IS NULL THEN
> SET VAR v1 = ('EMAIL SEND FAIL:' & .v1)
> PAUSE 2 USING .v1 CAPTION 'EMAIL FAIL!' ICON SERIOUS OPTION
> MESSAGE_FONT_SIZE 11 ENDIF
>
> PLUGIN RMail v1|HIDE PROGRESS
> PLUGIN RMail v1|WAIT 1000
>
>
>
>
> -----Original Message-----
> From: Gary Wendike <[email protected]>
> To: RBASE-L Mailing List <[email protected]>
> Sent: Sat, Jan 25, 2014 1:17 pm
> Subject: [RBASE-L] - Re: RMail 9.5
>
>
> OK...thanks to all.
>
> Steps to run the successful RMail test...
> I moved the RMail.CFG to the RBG95_64 directory
> Made sure the RBM file was in the same directory
> Followed the outline as sent by Razzak with changes to reflect my
> connection...Thanks so much of the outline.
>
> Results were an R:Successful email transmission. OK...this is going to
> be fun now.
>
> Again Thanks to all!!!!
> Gary
>
> -----Original Message-----
> From: [email protected] [mailto:[email protected] <mailto:rbase-
> [email protected]?> ] On Behalf Of A. Razzak Memon
> Sent: Saturday, January 25, 2014 12:27 PM
> To: RBASE-L Mailing List
> Subject: [RBASE-L] - Re: RMail 9.5
>
> At 01:58 AM 1/25/2014, Gary Wendike wrote:
>
> >I have moved on to RMail 9.5 from 2.6 in hopes of providing an email
> >solution for a client. I currently am just trying to get the program
> >to send a simple email as a test.
>
> Gary,
>
> Here's an example to send e-mail using R:Mail 9.5 ..
>
> You will need to update/correct the following parameters based on your
> mail server, user name, and password.
>
> Line 12: HOST_NAME (smtp port to connect to) Line 16: PASSWORD (user
> password) Keep the double quotes where required
>
> -- Example
> CLS
> SET VAR vPause2Message TEXT = NULL
> SET VAR vRMail TEXT = NULL
> SET VAR v1 TEXT = NULL
> SET VAR vMailTo TEXT = ('v1|ADD_RECIPIENT'&'"Gary Wendike"
> <[email protected]>')
> SET VAR vSubject TEXT = ('v1|SUBJECT Testing R:Mail 9.5')
> PLUGIN RMail v1|CLEAR_ALL
> PLUGIN RMail v1|WAIT 1000
> PLUGIN RMail v1|SHOW PROGRESS
> PLUGIN RMail v1|HIDE LOG
> PLUGIN RMail v1|MESSAGE_TYPE TEXT
> PLUGIN RMail v1|HOST_NAME yoursmtphostname
> PLUGIN RMail v1|HOST_PORT 25
> PLIGIN RMail v1|AUTHENTICATION ON
> PLUGIN RMail v1|USER_NAME [email protected]
> PLUGIN RMail v1|PASSWORD yourpassword
> PLUGIN RMail v1|SENDER_INFO_TEXT "L.J. Ehrlich" <[email protected]>
> PLUGIN RMail v1|ADD_REPLY_TO "L.J. Ehrlich" <[email protected]>
> PLUGIN RMail .vMailTo
> PLUGIN RMail v1|ADD_CC_RECIPIENT [email protected]
> PLUGIN RMail v1|ORGANIZATION L.J. Ehrlich and Associates
> PLUGIN RMail v1|PRIORITY HIGH
> PLUGIN RMail .vSubject
> PLUGIN RMail 'v1|ADD_TO_MESSAGE_BODY '
> PLUGIN RMail 'v1|ADD_TO_MESSAGE_BODY '
> PLUGIN RMail 'v1|ADD_TO_MESSAGE_BODY My First RMail 9.5 Message.'
> PLUGIN RMail 'v1|ADD_TO_MESSAGE_BODY '
> PLUGIN RMail 'v1|ADD_TO_MESSAGE_BODY Using R:Mail 9.5, of course!'
> CLS
> PAUSE 3 USING 'Now sending e-mail .....' +
> CAPTION ' Testing R:Mail 9.5 with R:BASE eXtreme 9.5' +
> ICON INFO +
> OPTION TOP 160 +
> |MESSAGE_FONT_NAME Tahoma +
> |MESSAGE_FONT_SIZE 10 +
> |MESSAGE_FONT_COLOR RED +
> |THEMENAME Longhorn
> PLUGIN RMail vRMail|SEND
> IF vRMail <> 'OK' THEN
> PLUGIN RMail v1|HIDE PROGRESS
> SET VAR vPause2Message = +
> ('eMail did not send due to a possible system or smtp error as
> follows: '+ +
> (CHAR(013))+(CHAR(013))+.vRMail)
> CLS
> PAUSE 2 USING .vPause2Message CAPTION 'E-Mail Error' ICON
> WARNING +
> BUTTON 'Press any key to continue ...' +
> OPTION MESSAGE_FONT_NAME Tahoma +
> |MESSAGE_FONT_COLOR RED +
> |MESSAGE_FONT_SIZE 11 +
> |THEMENAME Longhorn
> GOTO Done
> ENDIF
> CLS
> PLUGIN RMail v1|HIDE PROGRESS
> CLS
> PAUSE 2 USING 'E-Mail Sent Successfully!' +
> CAPTION 'R:Mail 9.5' ICON CONFIRM +
> BUTTON 'Press any key to continue ...' +
> OPTION MESSAGE_FONT_NAME Tahoma +
> |MESSAGE_FONT_COLOR GREEN +
> |MESSAGE_FONT_SIZE 11 +
> |THEMENAME Longhorn
> LABEL Done
> CLS
> CLEAR VARIABLES vMailTo,vSubject,vPause2Message,vRMail
> RETURN
>
> Hope that helps!
>
> Feel free to reach out to me with any questions.
>
> Very Best R:egards,
>
> Razzak.
>
> www.rbase.com
> www.facebook.com/rbase
> --
> 31 years of continuous innovation!
> 16 Years of R:BASE Technologies, Inc. making R:BASE what it is today!
> --
>
> --- RBASE-L
> ================================================
> TO POST A MESSAGE TO ALL MEMBERS:
> Send a plain text email to [email protected]
>
> (Don't use any of these words as your Subject:
> INTRO, SUBSCRIBE, UNSUBSCRIBE, SEARCH,
> REMOVE, SUSPEND, RESUME, DIGEST, RESEND, HELP)
> ================================================
> TO SEE MESSAGE POSTING GUIDELINES:
> Send a plain text email to [email protected] In the message SUBJECT,
> put just one word: INTRO
> ================================================
> TO UNSUBSCRIBE:
> Send a plain text email to [email protected] In the message SUBJECT,
> put just one word: UNSUBSCRIBE
> ================================================
> TO SEARCH ARCHIVES:
> Send a plain text email to [email protected] In the message SUBJECT,
> put just one word: SEARCH-n (where n is the number of days). In the
> message body, place any text to search for.
> ================================================
>
>
