Como recuperar contatos usando o modelo de objeto do Outlook no Visual Basic .NET

O suporte para o Office 2003 terminou

A Microsoft terminou o suporte para o Office 2003 em 8 de abril de 2014. Esta alteração afetou as suas atualizações de software e opções de segurança. Saiba o que isto significa para você e como permanecer protegido.

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 313802
Este artigo foi arquivado. É oferecido "como está" e não será mais atualizado.
Sumário
O artigo passo a passo descreve como usar a biblioteca de objetos 10.0 do Outlook para recuperar contatos do Outlook no Visual Basic. NET.

back to the top

Criar o exemplo para recuperar contatos do Outlook

  1. Inicie o Microsoft Visual Studio NET..
  2. No menu arquivo , aponte para novo e, em seguida, clique em Project .
  3. Clique em Projetos do Visual Basic em Tipos de projeto e, em seguida, clique em Aplicativo de console em modelos . Por padrão, Module1.vb é criado.
  4. Adicionar uma referência para o objeto do Microsoft Outlook 10.0 biblioteca. Para fazer isso, execute as seguintes etapas:
    1. No menu Project , clique em Add Reference .
    2. Clique na guia COM .
    3. Clique em Microsoft Outlook 10.0 Object Library e em seguida, clique em Selecionar
    4. Clique em OK . Se você for solicitado a gerar wrappers para a biblioteca que você selecionou, clique em Sim .
  5. Na janela código, substitua o código padrão com o seguinte código:
    Imports System.ReflectionModule Module1    Sub Main()        ' Create Outlook application.        Dim oApp As Outlook.Application = New Outlook.Application()        ' Get NameSpace and Logon.        Dim oNS As Outlook.NameSpace = oApp.GetNamespace("mapi")        oNS.Logon("Outlook", Missing.Value, False, True) ' TODO:        ' Get the first contact from the Contacts folder.        Dim cContacts As Outlook.MAPIFolder = oNS.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts)        Dim oItems As Outlook.Items = cContacts.Items        Dim oCt As Outlook.ContactItem        Try            oCt = oItems.GetFirst()            ' Display some common properties.            Console.WriteLine(oCt.FullName)            Console.WriteLine(oCt.Title)            Console.WriteLine(oCt.Birthday)            Console.WriteLine(oCt.CompanyName)            Console.WriteLine(oCt.Department)            Console.WriteLine(oCt.Body)            Console.WriteLine(oCt.FileAs)            Console.WriteLine(oCt.Email1Address)            Console.WriteLine(oCt.BusinessHomePage)            Console.WriteLine(oCt.MailingAddress)            Console.WriteLine(oCt.BusinessAddress)            Console.WriteLine(oCt.OfficeLocation)            Console.WriteLine(oCt.Subject)            Console.WriteLine(oCt.JobTitle)        Catch            Console.WriteLine("an error occurred")        Finally            ' Display            'oCt.Display(True)            ' Log off.            oNS.Logoff()            ' Clean up.            oApp = Nothing            oNS = Nothing            oItems = Nothing            oCt = Nothing        End Try            End SubEnd Module					
  6. Modificar o código onde você vê os comentários de tarefa.
  7. Pressione F5 para criar e executar o aplicativo.
  8. Verifique se que o primeiro contato é recuperado.
back to the top
Referências
Para obter mais informações, visite o seguinte site da Microsoft Developer Network (MSDN):
Microsoft Office Development com Visual Studio
http://msdn2.microsoft.com/en-us/library/aa188489(office.10).aspx
back to the top
OOM

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 313802 - Última Revisão: 12/07/2015 08:16:37 - Revisão: 4.3

Microsoft Office Outlook 2003, Microsoft Outlook 2002 Standard Edition, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbnosurvey kbarchive kbmt kbhowtomaster KB313802 KbMtpt
Comentários