notes.iniに環境変数をセットしたり、セットしてある環境変数を取得したりする方法です。
notes.iniの環境変数には2種類ある。$で始まるユーザ環境変数と、それ以外のシステム環境変数です。
サンプルでは、このうちシステム環境変数の値を取得して、プロンプト表示するものです。
※@関数の@Environmentでは、ユーザ環境変数は取得できるが、システム環境変数は取得できないので、注意してほしい。
-----------------------------------------------------------
Sub Click(Source As Button)
Dim session As New NotesSession
Dim env As String
'二つ目のパラメータにTrueを指定しないと、環境変数名の頭に$をつけてしまうので、注意
env = session.GetEnvironmentString( "Directory", True )
Messagebox "Notes.iniの環境変数Directoryの値は、" & Chr$(10) & env & Chr$(10) & "です。", _
0, "環境変数の取得"
End Sub






0 コメント:
コメントを投稿