Interop.Outlook - Hva med forskjellige versjoner?

[Moskus]

Microsoft.Office.Interop er ikke gøy. Hos oss brukes det 4 forskjellige versjoner av Office fra 2000 til 2007.

 

For det meste i Word og Excel lar det seg komme rundt ved å gjøre f.eks.

Dim xl as Object
xl = CreateObject("Excel.Application")

 

... men nå trenger jeg faktisk Namespace'er og Events. Og så vidt jeg forstår må jeg da bruker Interop. OK, så vi legger til som referanse og koder...

 

Imports Outlook = Microsoft.Office.Interop.Outlook
-------

   Private objApp As Outlook.Application
   Private objNS As Outlook.NameSpace
   Private WithEvents olInboxItems As Outlook.Items

-------

   Private Sub Form1_Load() Handles MyBase.Load
       objApp = New Outlook.Application()
       objNS = objApp.GetNamespace("mapi")
       olInboxItems = objNS.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox).Items
  End Sub

-------

   Private Sub olInboxItems_ItemAdd(ByVal Item As Object) Handles olInboxItems.ItemAdd
       DisplayMessage(Item.EMail.ToString)
   End Sub

 

Er det noen måter jeg kan få Microsoft.Office.Interop.Outlook til å kjøre på alle versjoner av Office uten å måtte lage 4 forskjellige versjoner?

Endret 8. november 2006 av moskus

[wolf5]

Vanskelig sak siden alle deler samme namespace. Litt søking på nett gir meg:

 

http://support.microsoft.com/default.aspx?kbid=244167

To summarize, if you are developing an Automation client that you intend to work with multiple versions of an Office application, you should:

 

• Reference the type library of the earliest version of the Office application you intend to Automate. -or-

 

• Use late binding.

 

Ditt problem var at du ikke kunne bruke late binding, så da er vel tipset å bruke den tidligste versjonen av office interopene.

Endret 11. november 2006 av wolf5

[Moskus]

Ah! Mye klokere, tusen takk! Skal gi beskjed om det går.