Examples: SetEnvironmentVar method

  1. This script sets the value of the HomeTown environment variable to "Salvador." The following line gets added to the user's notes.ini (or Notes® Preferences) file: $HomeTown=Salvador
    Dim session As New NotesSession
    Call session.SetEnvironmentVar( "HomeTown", "Salvador" )
  2. These two form scripts work together to set and retrieve the HomeTown environment variable. The first script places the contents of the HomeTown environment variable into the HomeTown field of a newly created document. Every time the user composes a document with the form, the HomeTown field is automatically filled in with the value of the environment variable. The second script places the contents of the HomeTown field into the HomeTown environment variable whenever the user saves the document.
    Sub Postopen(Source As Notesuidocument)
      Dim session As New NotesSession
      town = session.GetEnvironmentString( "HomeTown" )
      If source.IsNewDoc Then
        Call source.FieldSetText( "HomeTown",  town )
      End If
    End Sub
    Sub Querysave(Source As Notesuidocument, _
    Continue As Variant)
      Dim session As New NotesSession
      Call session.SetEnvironmentVar _
      ("HomeTown",source.FieldGetText("HomeTown"))
    End Sub