LOTUSSCRIPT /COM/OLE のクラス
例:環境変数を使用する
1.
次のボタンの例は、環境変数 $SeqNo を 1 大きくして、その結果を出力します(このスクリプトは、連番のシステムを持つサーバーでは正しく実行されない場合があります)。
Sub Click(Source As Button)
Dim session As New NotesSession
seqNo = session.GetEnvironmentValue("SeqNo")
If Isempty(seqNo) Then
Call session.SetEnvironmentVar("SeqNo", 1)
Else
seqNo = seqNo + 1
Call session.SetEnvironmentVar _
("SeqNo", Cint(seqNo))
End If
Messagebox session.GetEnvironmentValue("SeqNo")
End Sub
2. 次のエージェントの例では、システム環境変数の値を出力します。環境変数は数値または文字列で、GetEnvironmentString を使用して取得します。GetEnvironmentString の 2 番目の引数が True であるため、環境変数の名前にドル記号は付きません。
Sub Initialize
Dim session As New NotesSession
envVarName = Inputbox$("Environment variable name")
envVar = session.GetEnvironmentString(envVarName, _
True)
If envVar = "" Then
Messagebox(envVarName & " not set")
Else
Messagebox(envVarName & " = " & envVar)
End If
End Sub
関連項目
環境変数を使用する
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集