TOTVSTEC

Árvore de páginas

Obtém todas as pastas assinadas de uma conta de e-mail, através do servidor IMAP.

Sintaxe

GetFolderList()

Retorno

Nome

Tipo

Descrição

aRet

vetor

Retorna um array com todas as pastas 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.
  • Esse método retorna todas as pastas assinadas (pastas habilitadas ou Subscribe) em forma de array.
  • Cada pasta contém informações de nome, status e 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:GetFolderList() )
  
  oMail:Disconnect()
return
  • Sem rótulos