例: PercentUsed property

次のスクリプトは whitespc.nsf が占める割合を取得して、変数 used に代入します。例えば、PercentUsed は 84.1 を返します。

Dim db As New NotesDatabase( "", "whitespc.nsf" )
Dim used As Double
used = db.PercentUsed