Você está offline; aguardando reconexão

Lista de como trabalhar com o endereço utilizando o Outlook 10.0 Object Library no Visual Basic .NET

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 revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática… erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 313799
Este artigo foi arquivado. Este artigo é oferecido "tal como está" e deixará de ser actualizado.
Sumário
Este artigo fornece exemplos para trabalhar com o endereço lista utilizando o Microsoft Outlook 10.0 Object Library com o Microsoft Visual Basic. NET.

Este artigo descreve como efectuar um ciclo através do conjunto AddressLists para escrever o nome de cada objecto AddressList disponível para a janela da consola.

Este artigo também descreve como fazer referência a AddressEntry objectos num objecto AddressList utilizando o método GetFirst e a propriedade ' nome e a propriedade Index do objecto AddressEntry .

Além disso, este artigo descreve como fazer referência a uma lista de distribuição por nome e, em seguida, escrever a lista de membros para a janela de consola.
INTRODUÇÃO
Este artigo passo a passo contém exemplos de programação de cenários comuns quando trabalhar com objectos AddressList e AddressEntry objectos utilizando o Outlook 10.0 Object Library no Visual Basic. NET. Na secção "Introdução", contém os passos para criar um projecto de Visual Basic .NET da consola de aplicação que pode utilizar para trabalhar com os exemplos de código noutras secções.

back to the top

Introdução

Para utilizar os exemplos de código neste artigo, tem de criar um projecto de aplicação do Visual Basic .NET consola vazio. Também tem de adicionar uma referência para o Microsoft Outlook 10.0 Object Library para este projecto. Para o fazer, siga estes passos:
  1. Inicie o Microsoft Visual Studio NET..
  2. No menu ficheiro , aponte para Novo e, em seguida, clique em projecto .
  3. Em tipos de projectos , clique em Projectos do Visual Basic .
  4. Em modelos , clique em Consola de aplicação . Por predefinição, é criado um módulo que chama Module1.vb.
  5. Adicione uma referência para o Microsoft Outlook 10.0 Object Library. Para o fazer, siga estes passos:
    1. No menu projecto , clique em Add Reference .
    2. Na caixa de diálogo Adicionar referência do , clique no separador COM .
    3. No separador COM , clique em Microsoft Outlook 10.0 Object Library , clique em Seleccionar e, em seguida, clique em OK .

      Se receber uma mensagem para gerar mensagens publicitárias para a biblioteca que seleccionou, clique em Sim .
back to the top

Enumerar os objectos AddressList disponíveis

Pode efectuar um ciclo através do conjunto de AddressLists e, em seguida, escrever o nome de cada objecto AddressList disponível para a janela da consola. Para o fazer, siga estes passos:
  1. Na janela de código do projecto que criou na secção "Introdução", substitua o código existente com o seguinte código:
    Module Module1    Sub Main()        ' Create an Outlook application.        Dim oApp As Outlook._Application = New Outlook.Application()        ' Get the MAPI namespace.        Dim oNS As Outlook.NameSpace = oApp.Session        ' Get the AddressLists collection.        Dim oALs As Outlook.AddressLists = oNS.AddressLists        Console.WriteLine(oALs.Count)        ' Loop through the AddressLists collection.        Dim i As Integer        Dim oAL As Outlook.AddressList        For i = 1 To oALs.Count            oAL = oALs.Item(i)            Console.WriteLine(oAL.Name)        Next        ' Clean up.        oAL = Nothing        oALs = Nothing        oNS = Nothing        oApp = Nothing    End SubEnd Module
  2. Adicione um ponto quebra a última linha do código.
  3. Prima F5 para compilar e executar o projecto de aplicação de consola.
  4. Verifique se a lista de objectos AddressList aparece na janela da consola.
back to the top

Fazer referência a objectos AddressEntry na lista de endereços global

Pode referenciar os objectos AddressEntry objecto AddressList utilizando o método GetFirst juntamente com a propriedade ' nome e a propriedade Index dos objectos AddressEntry . Para o fazer, siga estes passos:
  1. Na janela de código, substitua o código existente com o seguinte código:
    Module Module1    Sub Main()        ' Create an Outlook application.        Dim oApp As Outlook._Application = New Outlook.Application()        ' Get the MAPI namespace.        Dim oNS As Outlook.NameSpace = oApp.Session        ' Get the Global Address List.        Dim oALs As Outlook.AddressLists = oNS.AddressLists        Dim oGal As Outlook.AddressList = oALs.Item("Global Address List")        Console.WriteLine(oGal.Name)        ' Get all the entries.        Dim oEntries As Outlook.AddressEntries = oGal.AddressEntries        ' Get the first user.        Dim oEntry As Outlook.AddressEntry = oEntries.GetFirst()        ' Output some common properties.        Console.WriteLine(oEntry.Name)        Console.WriteLine(oEntry.Address)        Console.WriteLine(oEntry.Manager)        ' Get the users by name.        ' TODO: Replace UserName with your recipient name.        oEntry = oEntries.Item("UserName")        ' Output some common properties.        Console.WriteLine(oEntry.Name)        Console.WriteLine(oEntry.Address)        Console.WriteLine(oEntry.Manager)        ' Get the users by index.        oEntry = oEntries.Item(2)        ' Output some common properties.        Console.WriteLine(oEntry.Name)        Console.WriteLine(oEntry.Address)        Console.WriteLine(oEntry.Manager)        ' Clean up.        oApp = Nothing        oNS = Nothing        oALs = Nothing        oGal = Nothing        oEntries = Nothing        oEntry = Nothing    End SubEnd Module
  2. No código exemplo, modifique o código onde ver TODO.
  3. Adicione um ponto quebra a última linha do código.
  4. Prima F5 para compilar e executar a aplicação.
  5. Verifique se as informações do utilizador obtidos aparecem na janela da consola.
back to the top

Enumerar os membros de uma lista de distribuição do Exchange

Pode fazer referência a uma lista de distribuição por nome e, em seguida, escrever a lista de membros para a janela da consola. Para o fazer, siga estes passos.

Nota Este código de exemplo foi concebido para trabalhar com uma lista de distribuição do Exchange que é armazenado na lista de endereços global.
  1. Na janela de código, substitua o código existente com o seguinte código:
    Module Module1    Sub Main()        ' TODO: Replace My DL Name with a valid distribution list name.        Dim sDLName As String = "My DL Name"        ' Create an Outlook application.        Dim oApp As Outlook._Application = New Outlook.Application()        ' Get the MAPI namespace.        Dim oNS As Outlook.NameSpace = oApp.Session        ' Get the Global Address List.        Dim oALs As Outlook.AddressLists = oNS.AddressLists        Dim oGal As Outlook.AddressList = oALs.Item("Global Address List")        Console.WriteLine(oGal.Name)        ' Get a specific Distribution List.        Dim oEntries As Outlook.AddressEntries = oGal.AddressEntries        ' Reference the Distribution List by name.        Dim oDL As Outlook.AddressEntry = oEntries.Item(sDLName)        Console.WriteLine(oDL.Name)        Console.WriteLine(oDL.Address)        ' Get all the members of the Distribution List.        oEntries = oDL.Members        Dim oEntry As Outlook.AddressEntry        Dim i As Integer        For i = 1 To oEntries.Count            oEntry = oEntries.Item(i)            Console.WriteLine(oEntry.Name)        Next        ' Clean up.        oEntry = Nothing        oEntries = Nothing        oGal = Nothing        oALs = Nothing        oNS = Nothing        oApp = Nothing    End SubEnd Module
  2. No código exemplo, modifique o código onde ver TODO.
  3. Adicione um ponto quebra a última linha do código.
  4. Prima F5 para compilar e executar a aplicação.
  5. Verifique se as informações do utilizador obtidos aparecem na janela da consola.
back to the top
outsol outsol2002 OOM modelo

Aviso: Este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 313799 - Última Revisão: 12/07/2015 08:16:21 - Revisão: 1.2

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

  • kbnosurvey kbarchive kbmt kbxml kbmsg kbcode kbhowtomaster KB313799 KbMtpt
Comentários