Searching for contacts

In outlook I have a custom contact form. I have a contact folder in Mailbox as well in favorites. When i save a contact in mailbox, it automatically, creates a copy in favorites.

Its is linked as Mailbox.billinginformation = faovrites.entry

I need to write a code for following:

for every contact in mailbox, i need to find whether there is a copy in favorties. if copy exists, i hv to display "1" else display "2"

can anyone pls write sample code for this using VBA ..Pls try to use the best and fastest technique.

Thanks