Examples: ComposeDocument method

1. This view action script composes a new Main Topic document in the current database.

   Sub Click(Source As Button)
     Dim workspace As New NotesUIWorkspace
     Call workspace.ComposeDocument( "", "", "Main Topic" )
   End Sub

2. This view action script composes a new Main Topic document in the current database and moves the insertion point to the ProjectDescription field.

   Sub Click(Source As Button)
     Dim workspace As New NotesUIWorkspace
     Dim uidoc As NotesUIDocument
     Set uidoc = workspace.ComposeDocument _
     ( "", "", "Main Topic" )
     Call uidoc.GoToField( "ProjectDescription" )
   End Sub

3. This form action script copies the contents of the Topic field of the current document to the Clipboard. It composes a new Memo document in HERE.NSF on server Rio (changing the value of the uidoc object), and pastes the contents of the Clipboard into the Subject field of the new document.

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  Call uidoc.GotoField( "Topic" )
  Call uidoc.SelectAll
  Call uidoc.Copy
  Set uidoc = workspace.ComposeDocument _
  ( "Rio", "here.nsf", "Memo" )
  Call uidoc.GotoField( "Subject" )
  Call uidoc.Paste
End Sub