Замечание к документу "Печально.. Разве что такой вариант:"   >>>

Тема: Вот ... наваял тут на досуге - только для R6.х - класс для замены картинок в аттачах на свои... (+)

которые лежат в Image ресурсах БД.

Ресурсы должны содержать в alias имя типа "_att_.ext" где ext расширение файла, с которым будет ассоциироватся картинка и

иметь формат GIF.
Класс AttPictureSetClass
Пример использования:
Sub Initialize
Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim cl As NotesDocumentCollection
'''''''''''''''
Dim attObj As AttPictureSetClass
'''''''''''''''
Set db=s.CurrentDatabase
Set doc=db.UnprocessedDocuments.GetFirstDocument
Set attObj=New AttPictureSetClass
Call attObj.GetImageRes
attObj.ProcessObject doc,db
End Sub

первым параметром может быть обьекты типа NotesDatabase, NotesDocument, NotesDocumentCollection NotesNoteCollection.

Минусы - на большик коллекциях обьектов изрядно тормозит + надписи почему-то только San Serif 10.

P.S.

т.е. при аттаче файлов из скрипта можно приклеить и свои иконки к файлу

P.P.S ест-сно ... и как обычно... может глючить :)