|
Hello All-
I've still got a problem that I am hoping someone will be able
to help with.
The below code, although lengthy and absurd, is very simple
and shows the issue. The entire code string simply generates an email
message in Microsoft Outlook. EET, EES, EEC, and EEB generate the "to:",
"Subject line", "Carbon copy", and "blind carbon copy" respectively for the
email. This part works fine.
EED just assembles a number of sentences to form the body
of the email.
If you cut and paste the code at the R> prompt, you should
be able to obtain the same results that I have found.
If VEMAIL is left as a text field, the email will generate
normally, but the body of the text will be abbreviated, as one would expect
from a finite length for a text field.
If VEMAIL is changed to a note field in order to get all of
the assembled sentences, the message "RBG65 has caused an error in Kernal32.dll"
appears-- and we are cooked.
"A" is nothing more than counting the text characters in the
body string. The count is actually 2979 characters-- well within the scope
of the typical note field maximum of 5000 characters.
SET QUOTES = '
SET VAR EET NOTE = '[EMAIL PROTECTED]' SET VAR EES NOTE = 'THIS IS THE SUBJECT LINE' SET VAR EEC NOTE = 'THIS IS THE CARBON COPY TO'
SET VAR EEB NOTE = 'THIS IS THE BLIND CARBON TO LINE'
SET VAR EED NOTE = 'THIS IS THE #1 SENTENCE IN THE PARAGRAPH THAT WILL
+
APPEAR IN THE BODY OF THE EMAIL' SET VAR EED NOTE = (.EED + 'THIS IS THE #2 SENTENCE IN THE PARAGRAPH THAT
+
WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #3 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #4 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #5 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #6 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #7 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #8 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #9 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #10 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #11 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #12 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #13 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #14 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #15 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #16 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #17 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #18 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #19 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #20 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #21 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #22 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #23 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #24 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #25 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #26 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #27 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #28 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #29 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #30 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #31 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #32 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #33 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #34 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #35 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') SET VAR EED NOTE = (.EED + 'THIS IS THE #36 SENTENCE IN THE PARAGRAPH THAT + WILL APPEAR IN THE BODY OF THE EMAIL') *(the below gives the length of the body)
SET VAR A INTEGER = (SLEN(.EED))
WRITE .A AT 10,10 SET VAR VEMAIL TEXT =
+
('mailto:'+.EET+'?subject='+.EES+'&cc='+.EEC+'&bcc='+.EEB+'&body='+.EED) LAUNCH .VEMAIL
Give it a try. I appreciate any help.
Lee Bailey
|
BEGIN:VCARD VERSION:2.1 N:Bailey;Lee FN:Lee Bailey ORG:Bailey & Associates TEL;WORK;VOICE:(954) 659-1780 TEL;HOME;VOICE:954-389-4789 TEL;WORK;FAX:(954) 659-1781 TEL;HOME;FAX:954-659-1781 ADR;WORK:;;2420 Deer Creek Road;Weston;FL;33327;United States of America LABEL;WORK;ENCODING=QUOTED-PRINTABLE:2420 Deer Creek Road=0D=0AWeston, FL 33327=0D=0AUnited States of America ADR;HOME:;;2420 Deer Creek Road;Weston;Florida;33327;USA LABEL;HOME;ENCODING=QUOTED-PRINTABLE:2420 Deer Creek Road=0D=0AWeston, Florida 33327=0D=0AUSA URL;WORK:http://BaileyUS.com EMAIL;PREF;INTERNET:[EMAIL PROTECTED] REV:20011119T172146Z END:VCARD
