8/28/2025 11:30:35 AM
|
| |
| slxdeveloper.com Community Forums |
|
| |
|
|
The Forums on slxdeveloper.com are now retired. The forum archive will remain available for the time being. Thank you for your participation on slxdeveloper.com!
Forum to discuss writing script in Architect plugins for SalesLogix & general SalesLogix customization topics (for Windows client only). View the code of conduct for posting guidelines.
|
|
|
|
How to create an Email with signatures(Outlook 2003, SLX 7.2)
Posted: 24 Mar 09 5:32 PM
|
Hi,
I need to create an email with an attachemnt and user's signature.
When I assign
SafeItem.HTMLBody = "somethig" signatures are gone.
Below is the code which I am using (I tried both with Redemption and without and I have the same result).
Dim oOutlook
Dim oOutlookMail, SafeItem
Set oOutlook =CreateObject("Outlook.Application","localhost")
Set SafeItem = CreateObject("Redemption.SafeMailItem")
Set oOutlookMail = oOutlook.CreateItem(0)
SafeItem.Item = oOutlookMail
if strEmailTo <> "" then
SafeItem.Recipients.Add(strEmailTo)
end if
if strEmailToCC <> "" and strEmailToCC <> strEmailTo then
SafeItem.Recipients.Add(strEmailToCC)
end if
SafeItem.Subject = strSubject
if strReplAttachment <> "" then
SafeItem.Attachments.Add(strReplAttachment)
end if
if strRepairAttachment <> "" then
SafeItem.Attachments.Add(strRepairAttachment)
end if
SafeItem.Recipients.ResolveAll
''get signatures
SafeItem.Display
'SafeItem.HTMLBody = Replace(SafeItem.HTMLBody, InsertSomehowBeforeSignatures & ComposeQuoteEmailBody(strType))
SafeItem.HTMLBody = ComposeQuoteEmailBody(strType)
Set SafeItem = Nothing
Set oOutlookMail = Nothing
Set oOutlook = Nothing
BTW. We do not have SLX integrated in Outlook, so I cannot use QueMessage...
Thanks. |
|
|
|
You can
subscribe to receive a daily forum digest in your
user profile. View the site code
of conduct for posting guidelines.
 Forum RSS Feed - Subscribe to the forum RSS feed to keep on top of the latest forum activity!
|
|
|
|
|
|
|
|