iManageExtensibility OnCreateNewProfile event fire

Galcho

Hello guys,
I have the following problem:

I have myown AddIn for MS Word which uses iManO2K.iManageExtensibility and catches all it's events.
Most of them I checked and they works fine.
I found that OnCreateNewProfile cannot be used because the code in it is never executed.

The main goal is to catch objImportCmd passed by OnCreateNewProfile event and catch pImportCmd_OnInitDialog as I need to performsome additional action prior displaying dialog.

I use same technique to catch pEditProfileCmd_OnInitDialog as I catch OnEditProfile get objEditProfileCmd and after this Iplace code for
pEditProfileCmd_OnInitDialog.

P.S I am using VB6 with Office 2003and WorkSite 8.0

Thank in advance

Galin Iliev
Senior Software Develoepr

jny

If you're using the EAI mode, which is set in this key:

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Interwoven\WorkSite\8.0\Integration\Options]
"EnhancedApplicationIntegrationOpen"=dword:00000001
"EnhancedApplicationIntegrationSave"=dword:00000001

1=EAI; 0=Classic

you will need to sink into the OnIManFileSave event instead. The OnCreateNewProfile is reserved for Classic mode use.

[VBA] ' Class module
Private WithEvents objExtensibilitySink As iManO2K.iManageExtensibility
Private WithEvents objIManFileSaveCmdSink As IMANEXT2Lib.IManFileSaveCmd

Public Sub SinkIManageExtensibility( _
objExtensibility As iManO2K.iManageExtensibility)
Set objExtensibilitySink = objExtensibility

End Sub
Private Sub objExtensibilitySink_OnIManFileSave(ByVal objIManFileSaveCmd As Object)
Set objIManFileSaveCmdSink = objIManFileSaveCmd
End Sub