次のスクリプトは現在の Notes のセッションを取得します。次に、現在のセッションが実行されているプラットフォームの名前を表示します。例えば、Windows で実行されているとき、スクリプトは「Windows/32」のように表示します。
Dim db As New NotesDatabase( "Tegucigalpa", "cbanner.nsf" )
Dim session As NotesSession
Set session = db.Parent
Messagebox( session.Platform )