LOTUSSCRIPT/COM/OLE CLASSES

Examples: ValueLength property
This agent gets the internal lengths of all the items in the current document.

Sub Initialize
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim dc As NotesDocumentCollection
 Dim doc As NotesDocument
 Set db = session.CurrentDatabase
 Set dc = db.UnprocessedDocuments
 Set doc = dc.GetFirstDocument
 Forall item In doc.Items
   msg$ = msg$ & item.Name & " = " & item.ValueLength & Chr(10)
 End Forall
 Messagebox msg$,, "Internal item lengths of current document"
End Sub

See Also