Property Pages

  • Thread starter Thread starter dedejavu
  • Start date Start date
D

dedejavu

Hi all,
I can't seem to get my property page to show. When I make an activex
control I get to see the tab, but get the dreaded "unable to display"
message. I am using Ken Slovak's PhoneChanger as an example (thank you
so much for sharing that with the rest of us Ken). Ken's works, mine
doesn't; it must be something simple, but I just can't see it. Mine
works in a web page. Any help would be greatly appreciated.
Thanks
Pachydermitis

OCX CODE:

Option Explicit

Implements Outlook.PropertyPage
Dim objPPSite As Outlook.PropertyPageSite

Private Sub Command1_Click()
MsgBox "hi"
End Sub

Private Sub PropertyPage_Apply()
On Error Resume Next
Call UserControl_InitProperties
End Sub

Private Property Get PropertyPage_Dirty() As Boolean
On Error Resume Next
End Property

Private Sub PropertyPage_GetPageInfo(HelpFile As String, HelpContext As
Long)
On Error Resume Next
End Sub

Private Sub UserControl_InitProperties()
On Error Resume Next
Set objPPSite = Parent
End Sub

Private Sub UserControl_Terminate()
On Error Resume Next
Set objPPSite = Nothing
End Sub

ADD-IN CODE:

Private Sub oApp_OptionsPagesAdd(ByVal Pages As Outlook.PropertyPages)
On Error Resume Next
Pages.Add "Settings.ctlSettings", "My Stuff"
Pages.Add "PropertyPage.ctlPhoneChanger", "Phone"
End Sub
 
Back
Top