Outlook form and Lotus Notes

  • Thread starter Thread starter Wayne
  • Start date Start date
W

Wayne

Hi all,

We have an outlook form which is used for internal referrals between
sections of our business. One particular type of referral needs to be sent to
another business who are not running in an Outlook/Exchange environment, but
run Lotus Notes.

While they do receive the emails, they are blank and they can't do anything
with them. I was tinkering around with reformatting the form controls to
output text into item.body, but the receipient is only receiving an email
with our privacy disclaimer (which is automatically appended by our email
gateway), and even then the disclaimer is appearing in raw HTML format.

Is there any way I can have the form put a copy of the control values into
the text of the email, yet still retain a form format, so that recipients
using Outlook can view the referral in a form view, but recipeints using
other systems get a plain text representation of the form values?

I had experimented with the code below... but like I said the recipient was
receiving only HTML code of our privacy disclaimer which is automatically
appended to every email at our gateway...

Function Item_Send()

Item.Body = Request" & chr(13) & "------------" & chr(13) & chr(13) &
"Business Requirement: "

If Item.UserProperties("uservalue1") = True then Item.Body = Item.Body &
"[removed from example]"
If Item.UserProperties("uservalue2") = True then Item.Body = Item.Body &
"[removed from example]"
If Item.UserProperties("uservalue3") = true then Item.Body = Item.Body &
"[removed from example]"
If Item.UserProperties("uservalue4") = true then Item.Body = Item.Body &
"[removed from example]"
If Item.UserProperties("uservalue5") = True then Item.Body = Item.Body &
"[removed from example]"
If Item.UserProperties("uservalue6") = True then Item.Body = Item.Body &
"[removed from example]"
If Item.UserProperties("uservalue7") = True then Item.Body = Item.Body &
"[removed from example]"

Item.Body = Item.Body & "insert some other values here"

End Function


Thank you
 
That code looks OK. Does other code on the form work? Is the form published to the Organizational Forms library with the "send form definition with item" box unchecked?
 
Back
Top