I did a few searches mainly dealing with vbscript and found two that give hope. I have no way of testing this.

The first appears to be what I suggested above
http://www-10.lotus.com/ldd/nd6forum.nsf/0/72d14e06c0a90e76852572820054459b?OpenDocument

The second uses GetFirstItem (vbscript below)
 Code:
Do While Not fDoc Is Nothing
	ReDim Preserve fUNID(i)
	fUNID(i) = fDoc.UniversalID
						
	Set arrItem = fDoc.GetFirstItem("LastName")
	arrName = arrItem.Text
         wscript.echo arrName
 
	Set fDoc = notesView.GetNextdocument(fDoc)
	i=i+1
Loop


Powershell might also be an option.