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.
================================================
