- or download this
# Dim rtitem As Variant
# Set rtitem = doc.GetFirstItem( "Body" )
...
# End If
# End Forall
#End Sub
- or download this
foreach my $embeddedDoc ( $DocumentBody->{EmbeddedObjects} ) {
my $edocType =$embeddedDoc->{Type};
...
}
}
- or download this
use strict;
use Win32::OLE;
...
# You can get documentation on Notes objects from
# http://www.lotus.com/products/lotusscript.nsf