Examples: GotoTop method

This button script prompts the user for a location. The script then inserts the resulting string in the first editable field in the current document.

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Dim location As String
  Set uidoc = workspace.CurrentDocument
  location = Inputbox$ _
  ( "Please enter your location", "Location" )
  Call uidoc.GotoTop
  Call uidoc.InsertText( location )
End Subf