选中的notes文档的值怎样传到要打开的新文档中?
cs下选中的notes文档的值怎样传到要打开的新文档(不同表单)中?
[解决办法]
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
tt= uidoc.FieldGetText("fDocNumber")
Call uidoc.GotoField( "seqno" )
Call uidoc.SelectAll
Call uidoc.Copy
Set uidoc=workspace.ComposeDocument( "", "", "NewForm")
Calluidoc.FieldSetText("RelatedNo",Cstr(tt))
[解决办法]