例: GetEnvironmentString method

次のスクリプトは、ENVLoc 環境変数の値を取得し、その値を変数 location に格納します。例えば、ユーザーの notes.ini ファイルまたは Notes プリファレンスファイルが $ENVLoc=15 Rogers Street という行を含むとき、GetEnvironmentString は「15 Rogers Street」を返します。
```
Dim session As New NotesSession
Dim location As String
location = session.GetEnvironmentString( "ENVLoc" )
```
次の 2 つのフォームスクリプトは相互に関連して動作し、環境変数 ENVLoc を取得し、設定します。ユーザーがフォームを使用して新しい文書を作成するとき、ENVLoc の値は [Location] フィールドに格納されます。ユーザーがこのフォームを使用して文書を保存するとき、[Location] フィールドの内容は環境変数 ENVLoc に保存されます。したがって、ユーザーが文書を新規作成するたびに [Location] フィールドに入力する必要はありません。
```
Sub Postopen(Source As Notesuidocument)
  Dim session As New NotesSession
  If source.IsNewDoc Then
    Call source.FieldSetText( "Location",  _
    session.GetEnvironmentString( "ENVLoc" ) )
  End If         
End Sub
Sub Querysave(Source As Notesuidocument, _
Continue As Variant)
  Dim session As New NotesSession
  Call session.SetEnvironmentVar("ENVLoc", _
  source.FieldGetText("Location"))
End Sub
```
次のスクリプトは、システム環境変数 MailServer の値を取得します。例えば、notes.ini ファイルまたは Notes プリファレンスファイルが MailServer = London という行を含むとき、GetEnvironmentString は「London」を返します。
```
Dim session As New NotesSession
Dim server As String
server = session.GetEnvironmentString("MailServer", True)
```