LOTUSSCRIPT /COM/OLE のクラス

例:ServerName プロパティ
次の Visual Basic コードはサーバー名を表示します。クライアントで実行されている場合は例外のメッセージを表示します。

Private Sub ServerName_Click()
Dim s As New NotesSession
s.Initialize
 If s.ServerName <> Null Then
   MsgBox s.ServerName, , "ServerName"
 Else
   MsgBox "Running on a client", , "Not a server"
 End If
End Sub

関連項目