Replying with custom forms

[Guest]

When replying with my custom form, the option "When replying to a message -
Include and indent original message" behaves differently. If the form has any
vb code such as item_send, the reply gets a copy of the body but not the
marking for "-----Original Message----- with From, To, Send and Subject". If
there is no vb code in the custom form, the reply is formatted as expected
with the marking. I am trying to get the custom form to honor the default
behavior to include the marking. Help!

 

[Sue Mosher [MVP-Outlook]]

Interesting. What version of Outlook?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

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

 

[Guest]

I have tried this with both 2002 (v10.x) and 2003 (v11.x), the results are
the same.

 

[Guest]

Did you find a resolution for this? I am having the same problem.

 

[Sue Mosher [MVP-Outlook]]

I'm not even sure what the right sequence of events is to reproduce the problem. Can you tell us how you do it?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

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

 

[Guest]

I have near the cause down to one line of code and still don't understand why.

i have a set of radio buttons that will hide or show another group of
fields. Code below.

If comment these lines outh then the Reply feature works perfect.
the Set ReqPage line is the one that seems to cause the problem. If i
uncomment out this line then the Reply feature does not post the reply header
information into the message box area.

Any ideas of why?

Function ShowFileFrame()
Set ReqPage = Item.GetInspector.ModifiedFormPages("File Information")
If ReqPage.rdbNew.Value = True Then
ReqPage.frmTransfer.Visible = False
Call ClearTransfer()
ElseIf ReqPage.rdbExisting.Value = True Then
ReqPage.frmTransfer.Visible = False
Call ClearTransfer()
ElseIf ReqPage.rdbTransfer.Value = True Then
ReqPage.frmTransfer.Visible = True
Else
ReqPage.frmTransfer.Visible = False
Call ClearTransfer()
End If
Set ReqPage = Nothing
End Function