Sub Initialize
 Dim session As New NotesSession
 Dim doc As NotesDocument
 Set doc = session.DocumentContext
 Forall item In doc.Items
   Messagebox item.LastModified,, item.Name
 End Forall
End Sub

See Also

LastModified property

Glossary