Como usar o método AdvancedSearch para procurar um item no Outlook

Support for Office 2003 has ended

Microsoft ended support for Office 2003 on April 8, 2014. This change has affected your software updates and security options. Learn what this means for you and how to stay protected.

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: 326244
Este artigo foi arquivado. É oferecido "como está" e não será mais atualizado.
INTRODUÇÃO
Modelo de objeto do Microsoft Outlook no Microsoft Outlook 2002 fornece uma abordagem através de programação que você pode usar para pesquisar itens do Outlook usando o método AdvancedSearch . Esse método executa uma pesquisa de sintaxe SQL semelhante e tem quatro parâmetros que permitem você personalizar a pesquisa. O evento AdvancedSearchComplete é acionado por causa do método AdvancedSearch e você pode acessar a coleção de resultados no manipulador de evento AdvancedSearchComplete .

back to the top

Informações sobre o método AdvancedSearch

O método AdvancedSearch executa uma pesquisa especificada seqüência de caracteres que se baseia em uma pesquisa de sintaxe SQL semelhante e retorna um objeto Search . Esse método tem os quatro parâmetros a seguir que você pode usar para personalizar sua pesquisa Outlook:
  • escopo : O parâmetro de escopo Especifica o nome da pasta que está a ser pesquisada.
  • filtro : O parâmetro de filtro é um parâmetro de seqüência de caracteres opcional que define as restrições de pesquisa com base no esquema interno do servidor de email.
  • SearchSubFolders : O parâmetro SearchSubFolders é um parâmetro opcional que especifica se deve incluir subpastas da pasta que é especificado pelo parâmetro escopo . Este parâmetro somente é válido para pesquisas são executadas em um computador que está executando o Microsoft Exchange Server ou em uma pasta PST.
  • marca : O parâmetro de marca é um parâmetro opcional que é usado para nomear a pesquisa.
O seguinte código de exemplo usa o método AdvancedSearch para criar uma nova pesquisa retorna todos os itens na caixa de entrada que têm um assunto especificado pelo usuário: strS
Sub SearchInboxFolder()  Dim objSch As Search  Dim strF As String  Dim strS As String  Dim strT As String  Dim strTag As String      strS = "Inbox"  strT = InputBox("Enter the subject text.", "Search Criteria")  strF = "urn:schemas:httpmail:subject LIKE '%" & strT & "'"  strTag = "SubjectSearch"  ' TODO: Replace Application with the declared and set   ' Outlook Application object  Set objSch = Application.AdvancedSearch(strS, strF, False, strTag)End Sub
o seguinte código de exemplo usa o método AdvancedSearch para criar uma nova pesquisa retorna todos os itens na caixa de entrada que são marcadas com alta prioridade:
Sub SearchInboxFolder()  Dim objSch As Search  Dim strF As String  Dim strS As String  Dim strTag As String      strS = "Inbox"  strF = "urn:schemas:httpmail:importance = 2"  strTag = "ImportanceSearch"  Set objSch = Application.AdvancedSearch(strS, strF, False, strTag)End Sub
o seguinte código exemplo usa o método AdvancedSearch para criar uma nova pesquisa retorna todos os itens em um PST pasta são marcadas com alta prioridade. Se a propriedade FolderPath da pasta contiver espaços, use dupla cotações e aspas simples quando você definir o filtro de pesquisa ("' \PSTFolder\PST subpasta'", por exemplo). Se a propriedade FolderPath da pasta não contiver espaços, você pode omitir as aspas simples.
Sub SearchPSTFolder()  Dim objSch As Search  Dim strF As String  Dim strS As String  Dim strTag As String      ' TODO: Change "\PSTFolder\PST SubFolder" to the PST's FolderPath   ' property while omitting the first \   strS = "'\PSTFolder\PST SubFolder'"  strF = "urn:schemas:httpmail:importance = 2"  strTag = "ImportanceSearch"  Set objSch = objOL.AdvancedSearch(strS, strF, False, strTag)End Sub
back to the top

Informações sobre o AdvancedSearchComplete evento

O evento AdvancedSearchComplete do objeto Application do Outlook é usado para capturar o resultado de uma pesquisa que usa o método AdvancedSearch . O evento AdvancedSearchComplete ocorre quando o método AdvancedSearch conclui a execução. Esse evento retorna o objeto de pesquisa que foi criado no método AdvancedSearch e garante um conjunto completo. No evento AdvancedSearchComplete , código adicional é usado para manipular e interpretar os dados que são retornados da pesquisa.

Esse método tem um parâmetro para conectar este evento para o método AdvancedSearch . O parâmetro SearchObject é um parâmetro obrigatório que especifica o objeto de pesquisa que é retornado pelo método AdvancedSearch .

O código de exemplo a seguir exibe o número de resultados retornado pelo método AdvancedSearch em uma caixa de mensagem e, em seguida, imprime o assunto de cada mensagem na janela de depuração:
' TODO: Replace Application with the declared and set ' Outlook Application objectPrivate Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)  Dim objResults As Results  Set objResults = SearchObject.Results  MsgBox "AdvancedSearch found : " & objResults.count   For Each objResult In objResults    Debug.Print objResult.Subject  NextEnd Sub
back to the top

Propriedades

ID do Artigo: 326244 - Última Revisão: 12/07/2015 11:49:14 - Revisão: 1.4

Microsoft Office Outlook 2003, Microsoft Outlook 2002 Standard Edition

  • kbnosurvey kbarchive kbmt kboutlookobj kbhowtomaster kbinfo KB326244 KbMtpt
Comentários