check attachment name
Posted on 2001-06-07
the following codes check the filename of attachments.
It always returns me the first filename. The no. of times it is printed tallies with the no. of attachments. However, if I close the current document, re-open it and run the same codes, it returns me the correct filenames.
It works the same if I save the current doc instead of creating a temporary document.
Is this got to do with Notes itself?
'Check filename attached
Set tmpdoc = New notesdocument(db)
Call doc.Copyallitems(tmpdoc, True)
tmpdoc.Form = "TEMP"
Call tmpdoc.save(True, True) 'create temporary doc to check attachments
If Not (tmpdoc Is Nothing) Then
Forall attmt In tmpdoc.Items
If attmt.Name = "$FILE" Then