TOTVSTEC

Árvore de páginas

Tempo aproximado para leitura: 2 minutos

Obtém todas as pastas (Assinadas/Não assinadas) de uma conta de email do servidor IMAP.

Sintaxe

GetAllFolderList()

Retorno

Nome

Tipo

Descrição

aRet

vetor

Retorna um array com todas as pastas (Assinadas/Não assinadas) de uma conta de e-mail, com as seguintes informações: nome, status, número de mensagens existentes, número de mensagens lidas e número de mensagens não lidas.

Observações

  • Utilize esse método somente para conexão IMAP.
  • Caso a conexão utilizada não seja IMAP, será retornado um vetor vazio.
  • Caso não consiga obter o número de mensagens da pasta, o método retornará -1 nos campos referente ao número de mensagens (existentes, lidas e não lidas).

Estrutura de retorno do método:

array[1]
array[1][1]:cNome
array[1][2]:cStatus
array[1][3]:nNumMsg
array[1][4]:nNumMsgRecentes
array[1][5]:nNumMsgNaoLidas

Sendo:

cStatus

Descrição

I

NOINFERIOS

N

NOSELECT

M

MARKED

U

UNMARKED

Exemplos

#INCLUDE "TOTVS.CH"
#DEFINE EMAIL_ACCOUNT   'p10teste'
#DEFINE EMAIL_PASSWORD  '123'
#DEFINE EMAIL_SERVER    'mail.totvs.com.br'

User Function mail001()
  Local oMail := TMailMng():New( 1, 3, 3 )
  Local xRet
  
  oMail:cUser := EMAIL_ACCOUNT
  oMail:cPass := EMAIL_PASSWORD
  oMail:cSrvAddr := EMAIL_SERVER
  
  xRet := oMail:Connect()
  if xRet <> 0
    conout( nRet )
    conout( oMail:GetErrorString( nRet ) )
    return
  endif
  
  varinfo( "", oMail:GetAllFolderList() )
  
  oMail:Disconnect()
return
  • Sem rótulos