Como faço para obter anexos de um e -mail de Notas de Lotus usando o vb.net?

Question

Estou tentando recuperar um anexo de um e -mail de Notas de Lotus usando o EmbeddedObjects Array fora de um NotesDocument objeto. No meu teste, configurei um email com um anexo e estou tentando processá -lo. o HasEmbedded propriedade do NotesDocument Objeto está retornando verdadeiro, no entanto, o EmbeddedObjects Array do NotesDocument Objeto é sempre nada (nulo).

Alguma idéia do que poderia estar acontecendo aqui? Por que a matriz incorporada é sempre nada?

Answer 1

Acho que na minha última resposta dei uma resposta um tanto incorreta. A propriedade incorporada de um documento de notas inclui apenas objetos OLE incorporados e não anexos de arquivo. No entanto, a classe NotesRichTextItem possui uma propriedade incorporada que inclui anexos de arquivo. Portanto, se você souber o nome do "campo" que manterá seus anexos de arquivo - e por e -mail usando o modelo padrão, este será "corpo" - você poderá obter esse campo como um item de texto rico e, em seguida, obter os anexos do arquivo de lá. Aqui está uma amostra:

m_Doc = m_View.GetFirstDocument()
Do Until m_Doc is nothing
if (m_Doc.hasItem("body")) then
    m_rt = m_Doc.GetFirstItem("Body")
        if (m_rt.Type = RICHTEXT) then   ' RICHTEXT=1
            m_objects = m_rt.embeddedObjects
            ... ' same as earlier code to extract attachments
        end if
    end if
end if

Answer 2

Você pode usar o avaliar ("@attmentNames", doc) para obter a lista de anexos em um documento. Com os nomes (avalie as devoluções de uma matriz, mesmo que seja apenas uma), você usa o Doc.getAttachment para controlar.