Notes/Domino 4 and 5 Forum

Hi !

Maybe someone can help me with this script !

Let say that I have a form with two fields (both fields are Rich text ,editable)

Field A is hidden in read mode

and field B is hidden in edit mode. What I want to do is to have the value of field A also save to field B when I close the document.

So I have put this piece of script in the Querysave of the form

Dim Workspace As NotesUiWorkspace
Dim Uidoc As NotesUidocument
Dim object As Variant

Set Workspace = New NotesUIWorkspace
Set Uidoc = Workspace.currentdocument

object = UIdoc.FieldGetText("Field A")
Call Uidoc.FieldSetText("Field B", object)

it works just fine when I put straight text , numbers or URL's in field A , values get copied over to field B with no problems,

the problem occurs when I insert either document attachments or document links into field A, they won't show up in field B.
Anybody can tell me what else should be included in my script or what am I doing wrong ?

Any help appreciated !

Thanks