Hello!
My Problem: I want to find all MobileTelefonNumbers from the Outlook contacts.
Dim objKontakte As Object
'fldContacts is an Outlook-MAPI-Folder
Set objKontakte = fldContacts.Items.Find ("[MobileTelephoneNumber] <> '' ")
Do Until objKontakte Is Nothing
....
Set objKontakte = fldContacts.Items.FindNext
Loop
The first recordset is correct. But the next one (FindNext) is Nothing. Why?
Björn Hutzler
