LOTUSSCRIPT/COM/OLE CLASSES
Dim s As New NotesSession Dim pb As NotesPropertyBroker Set pb = s.GetPropertyBroker("com.ibm.compositeapps.samples") Dim prop As NotesProperty prop = pb.setPropertyValue("Track",newCategory$,_ "com.ibm.compositeapps.othersamples") Call prop.Publish()