Hi,

I designed a form in outlook using the post template and added the
following code:

Function Item_Open()
IntAns=MsgBox("Would you like to open a new account",_
vbQuestion+vbYesNo,"Account Request")
If IntAns=vbYes then
Set myInspector=Item.GetInspector
Set myPage=myInspector.ModifiedFormPages.Item("CusNum" )
Set fraOpen=myPage.Controls.Item("fraOpen")
fraOpen.Visible=True
End If
If IntAns=vbNo Then
Set myInspector=Item.GetInspector
Set myPage=myInspector.ModifiedFormPages.Item("CusNum" )
Set fraChange=myPage.Controls.Item("fraChange")
fraChange.Visible=True
End If
End Function

The problem I'm facing are on two levels. First when I work with the
form in my laptop it works fine however none of the frames show on the
read layout portion when posted. Secondly, I re-created the exact form
in my computer at work and when I try to run the form it crashes
Outlook (closes and restarts itself) when you attempt to Post. The
code runs well on both environments, it's just when you post or attempt
to post that the form exhibits these quirks. All I would like to do is
ask the question during the composing layout and show the results on
the read layout.

Any recommendations would be greatly appreciated.

Thank you.

Jade