このスクリプトは、選択した NotesPropertyBroker に「Track」のプロパティ値を設定します。
Dim s As New NotesSession Dim pb As NotesPropertyBroker Set pb = s.GetPropertyBroker() Call pb.setPropertyValue("Track",newCategory$) Call pb.Publish()