When an action is selected, I open a new form (specified on the Actions tab
as a reply, do not include original message.)  The form has the following
code:

dim olns
Dim pgRequest

Function Item_Open()

    msgbox "open form"
    Set olns = Application.GetNameSpace("MAPI")
     'Set the page
     Set pgRequest = Item.GetInspector.ModifiedFormPages("Main")
    msgbox "open"
End Function

   
Sub Item_CustomPropertyChange(ByVal Name)
    on error goto 0
    Set olns = Application.GetNameSpace("MAPI")
     'Set the page
     Set pgRequest = Item.GetInspector.ModifiedFormPages("Main")
    msgbox "property"
...
End Sub

I receive the error message Object doesn't support this property or method:
'item.getinspector'" citing the line in the Item_CustomPropertyChange sub.  
Then for each field on the form I get  "You do not have appropriate
permissions to perform this operation".  The "item_open" code never fires.

If I remove the Item_CustomPropertyChange sub code, the item_open code
executes without error.  

Do you have ideas as to what is wrong?

Thanks