Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 168
  • Last Modified:

Question on Outlook Automation

Experts, I am using the following code to access Outlook contacts for an application I am working on. At the very end when I quit the application if the user has Outlook open it closes the application. I thought that I was creating a new instance and closing it. Is there another way I should be doing this?

        Dim outlookApp As Outlook.Application = New Outlook.Application
        'Dim oNS As Outlook.NameSpace = outlookApp.Session
        Dim oNS As Outlook.NameSpace = outlookApp.GetNamespace("mapi")
        Dim oContacts As Outlook.MAPIFolder = oNS.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts)
        Dim oItems As Outlook.Items = oContacts.Items
        Dim oContact As Outlook.ContactItem = Nothing

        For Each contactItem As Outlook.ContactItem In oContacts.Items
            Debug.WriteLine(contactItem.FullName)
        Next

        outlookApp.Quit()
        outlookApp = Nothing

Open in new window

0
Basicfarmer
Asked:
Basicfarmer
1 Solution
 
David Johnson, CD, MVPOwnerCommented:
only 1 instance of outlook can run at a time
0
 
BasicfarmerAuthor Commented:
Thanks...
0

Featured Post

 [eBook] Windows Nano Server

Download this FREE eBook and learn all you need to get started with Windows Nano Server, including deployment options, remote management
and troubleshooting tips and tricks

Tackle projects and never again get stuck behind a technical roadblock.
Join Now