1. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление

Получение Поля Body

Тема в разделе "Lotus - Программирование", создана пользователем k85, 9 ноя 2011.

  1. k85

    k85 Well-Known Member

    Репутация:
    0
    Регистрация:
    11 окт 2011
    Сообщения:
    149
    Симпатии:
    0
    Необходимо из письма вынести в текстовый файл поле Body, письмо пришло с интернета. Получается в документе поле Body, состоит из 4-5 и более частей. Например, в свойствах показывает 4 поля Body у всех Data Type: MIME Part. Но в файл выводится только 2 поля, то есть не вся необходимая информация
    Код:
    Dim child As NotesMIMEEntity
    Dim s As New NotesSession
    s.ConvertMIME = False 
    Set dc = db.UnprocessedDocuments
    Set mime = doc.GetMIMEEntity
    If Not(mime Is Nothing) Then
    If mime.ContentType = "multipart" Then
    n = 0
    Set child = mime.GetFirstChildEntity
    While Not(child Is Nothing)
    nP = child.ContentType
    nP2 = child.ContentSubType
    ....
    Print #fileNum%,"Body: " &nP1 & nP & ....
    
    n = n + 1
    
    Set child = child.GetNextSibling
    Wend
    
    Else
    
    Messagebox "Not multipart",, doc.GetItemValue("Body")(0)
    
    End If
    
    
    Else 		' не MIME
    
    'Messagebox
    
    End If
    Помогите , пожалуйста, что не верно?
     
  2. nvyush

    nvyush Well-Known Member
    Lotus team

    Репутация:
    0
    Регистрация:
    22 апр 2009
    Сообщения:
    2.317
    Симпатии:
    0
    Количество полей Body != количество частей MIME. М.б. у Вас всё правильно работает.
     
  3. k85

    k85 Well-Known Member

    Репутация:
    0
    Регистрация:
    11 окт 2011
    Сообщения:
    149
    Симпатии:
    0
    просто если смотреть поле Body
    Код:
    	Set pole = doc.getfirstitem("Body")
    Print #fileNum%,"Body: "& pole.text
    то поле пустое, а информации в письме намного больше в Body, чем он выдает
     
  4. k85

    k85 Well-Known Member

    Репутация:
    0
    Регистрация:
    11 окт 2011
    Сообщения:
    149
    Симпатии:
    0
    скажите, пожалуйста, а можно вообще как-то получить данные из поля HTMLTempSource, его видно только из view->show-> page source
    Как взять оттуда всю информацию?
    Просто необходимо получить текстовый файл именно в таком виде, а там получается поле Subject имеет другую кодировку, и соответственно, не так отображается как в самом письме, да еще и в некоторых других полях тоже не так отображается
     
  5. k85

    k85 Well-Known Member

    Репутация:
    0
    Регистрация:
    11 окт 2011
    Сообщения:
    149
    Симпатии:
    0
    или может кто-то подскажет, как в тестовом документе отобразить данные в таком же виде, как в Source - From: =?Windows-1251?B?....
    Subject: ?Windows-1251?B?...
    в самом письме данные верно отображаются на русском. Но мне надо, чтобы название было в такой же кодировке, как и при отображении Page Source. Как правильно это сделать?
     
Загрузка...

Поделиться этой страницей