#1
|
|||
|
|||
Inserting a Hyperlink and Rich Text in Groupwise Email
Hello all,
Yes we still use GroupWise. I have found and modified a macro that creates and sends an email as needed. It works great, except that I need to insert a hyperlink to a file on the network. In order to hyperlink, the inserted text must be rich text. My problem is that the code creates an e-mail where the text is distorted and some of the characters disappear. Here is the code: Code:
Private Sub CmdSubmit_Click() Dim gwMessage As GroupwareTypeLibrary.Message2 Dim gwaccount As GroupwareTypeLibrary.Account2 Dim gwapp As GroupwareTypeLibrary.Application Dim gwattach As GroupwareTypeLibrary.Attachment Dim Manager As String Manager = InputBox(Prompt:="Enter manager user ID:", _ Title:="SUBMIT DOCUMENT FOR REVIEW") If Manager = "" Then Manager = InputBox(Prompt:="You have not entered a user ID! Enter manager user ID:", _ Title:="SUBMIT DOCUMENT FOR REVIEW") End If 'Open a groupware session. Set gwapp = CreateObject("NovellGroupWareSession") 'Login using the open acount Set gwaccount = gwapp.Login() 'Create a new message in the mailbox. Set gwMessage = gwaccount.MailBox.Messages.Add("GW.MESSAGE.MAIL", egwDraft) gwMessage.BodyText.RTF = "File://" & ActiveDocument.Path & "\" & ActiveDocument.Name gwMessage.Subject = "Pending Review" gwMessage.Recipients.Add Manager 'Send the message gwMessage.Send It appears the "-" character in my file path could be causing an issue as this is where the distortion starts. What am I doing wrong?? Thanks! Brock |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
problem reading rich text messages | Rkaskas | Outlook | 3 | 03-14-2011 09:40 AM |
Rich Text Box Font | jslist@sbcglobal.net | Word | 0 | 03-25-2010 08:29 AM |
Rich text in protected word document | jmarin | Word | 0 | 12-01-2008 04:54 AM |
Templates: automatic text generation from Rich Text content control | Chickenmunga | Word | 0 | 10-01-2008 11:16 AM |
Cannot hyperlink from an email | karen1430 | Outlook | 0 | 11-25-2007 03:54 PM |