Moving attachments in a Rich Text Field

I’m looking for a little direction on how I’d move attachments from one rich text field to another. I have a form with two rich text fields in it and I’d like to have a button that moves the attachments from the “New Attach” field to the “Old Attach” field. The one catch is that if there’s already attachments in the old field I’d like the new ones to just be appended to it. Can someone point me in the right direction? Thanks,

Subject: use Help

look at “Working with attachments and embedded objects in LotusScript classes”

It’s fairly simple - get a handle on the EmbeddedObject in the old file, and then do the move. Somthing like this…

Set rtitem = doc.GetFirstItem( “Body” )

If ( rtitem.Type = RICHTEXT ) Then

Forall o In rtitem.EmbeddedObjects

   .....

End Forall

End If