Convert Attachments To Embedded File In A Rt Field

This will convert attachments to embedded files in a notes document
dim fileName as string
Dim embedded As NotesEmbeddedObject
fileName = "InsertYourFileNameHere.txt"
Set embedded = doc.GetAttachment( fileName )
tempDir = Environ("TEMP")
extractPath = tempDir + "\" + fileName
Call embedded.ExtractFile( extractPath )

Call attachmentRTI.EmbedObject( EMBED_ATTACHMENT, "", extractPath )
Call embedded.Remove
Kill extractPath

This was first published in November 2000

Dig deeper on Domino Resources - Part 3



Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:




  • iSeries tutorials's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...