例: SetEnvironmentVar method

次のスクリプトは環境変数 HomeTown の値を「Salvador」にします。ユーザーの notes.ini ファイルまたは Notes プリファレンスファイルに以下の行が追加されます。$HomeTown=Salvador
```
Dim session As New NotesSession
Call session.SetEnvironmentVar( "HomeTown", "Salvador" )
```
次の 2 つのフォームのスクリプトは相互に関連して動作し、環境変数 HomeTown を設定し、取得します。最初のスクリプトは環境変数 HomeTown の内容を新たに作成された文書の [HomeTown] フィールドに格納します。このフォームを使用して文書を作成するたびに、自動的に [HomeTown] フィールドに環境変数の値が入力されます。2 番目のスクリプトは、ユーザーが文書を保存するたびに [HomeTown] フィールドの内容を環境変数 HomeTown に入力します。
```
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
```