Examples: SelectAll method

This form action script copies the contents of the FirstDraft field and pastes them into the Revision field.

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  Call uidoc.GotoField( "FirstDraft" )
  Call uidoc.SelectAll
  Call uidoc.Copy
  Call uidoc.GotoField( "Revision" )
  Call uidoc.Paste
End Sub