Lotus Domino Designer 8 ヘルプ - 例:GetEnvironmentString メソッド

LOTUSSCRIPT /COM/OLE のクラス

例:GetEnvironmentString メソッド
1 次のスクリプトは、ENVLoc 環境変数の値を取得し、その値を変数 location に格納します。たとえば、ユーザーの notes.ini ファイルまたは Lotus Notes プリファレンスファイルが $ENVLoc=15 Rogers Street という行を含むとき、GetEnvironmentString は「15 Rogers Street」を返します。

Dim session As New NotesSession
Dim location As String
location = session.GetEnvironmentString( "ENVLoc" )

2 次の 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

3 次のスクリプトは、システム環境変数 MailServer の値を取得します。たとえば、notes.ini ファイルまたは Lotus Notes プリファレンスファイルが MailServer = London という行を含むとき、GetEnvironmentString は「London」を返します。

Dim session As New NotesSession
Dim server As String
server = session.GetEnvironmentString("MailServer", True)

関連項目

GetEnvironmentString メソッド

用語集

フィードバック ヘルプ または プロダクトユーザビリティ?

ヘルプの使い方

すべてのヘルプ項目

用語集