例: LogErrors property

次のスクリプトはエラーのログを記録するかしないかを設定します。

Dim currentLog As New NotesLog( "Turning Errors On and Off" )
Call currentLog.OpenMailLog _
( "Charlie Pycha", "Here's your log" )
currentLog.LogErrors = False
Call currentLog.LogError _
( 0, "This error never gets logged." )
'...do some other stuff...
currentLog.LogErrors = True
Call currentLog.LogError( 0, "This error does get logged." )
Call currentLog.Close