Message text disappears!




I have created an approval request form which can be sent to users for
approval or rejection. The recipient can then either 'approve' or 'reject'
by clicking on voting buttons from within the form. Either button click
triggers 'approve' or 'reject' forms (which are duplicates of the original
form) to be sent back to the user and copied to a public folder. The
'approve' or 'reject' forms retain text from the original request form in
every text box apart from the email message text box. Does anyone know why
this is?

I had the same problem with the 'approve' and 'reject' forms retaining
attachments and found the following vb code:

Function Item_CustomAction(ByVal Action, ByVal NewItem)
If Action.Name = "Activity Approved" Then
Call CopyAttachments(Item, NewItem)
Call CopyAttachments(Item, NewItem)
End If
End Function
Sub CopyAttachments(objSourceItem, objTargetItem)
Set fso = CreateObject("Scripting.FileSystemObject")
Set fldTemp = fso.GetSpecialFolder(2) ' TemporaryFolder
strPath = fldTemp.Path & "\"
For Each objAtt In objSourceItem.Attachments
strFile = strPath & objAtt.FileName
objAtt.SaveAsFile strFile
objTargetItem.Attachments.Add strFile, , , objAtt.DisplayName
fso.DeleteFile strFile

Set fldTemp = Nothing
Set fso = Nothing
End Sub

How do I modify this code to save the email message text as well? I'm not
really a programmer so any help would be MUCH appreciated.




Sue Mosher [MVP-Outlook]

Did you look at the properties of each custom action on the (Actions) page? The "when responding" setting determines what information is included in the response message. Or, you could just set the NewItem.Body property to the value of Item.Body.

Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question