Ken,

No worry's :-)
Yesterday late in the afternoon I've solved the problem!

Item is the filtered Appointment item with some contacts linked to it.
Item = olns.GetItemFromID(myAppt.EntryID, StoreID)

Dim iLinkItems As Integer = 0

Dim olinkitem As Outlook.Link = Nothing

For iLinkItems = 1 To Item.Links.count

olinkitem = Item.Links.Item(iLinkItems)

MsgBox("EntryID= " & olinkitem.Item.EntryID & " FullName= " &
olinkitem.Item.FullName)

Next

With this code I can get all data from the linked contacts!
The most important is the EntryID for identification :-)

Thanx for your help and succes with your projects!
You've save me a great deal of search time ;-)

Dikbill, The Netherlands




"Ken Slovak - [MVP - Outlook]" schreef in bericht
...
You're correct, I tested this here with a contact item so that fooled me.

I'd have to say after looking at it again and reviewing some of my old
code that worked with the Links collection that the only thing you're
going to be able to get back using the Outlook object model is the name
property of the link item.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


"Dikbill" wrote in message
. ..
Ken,

Thnx but

olContact = Item.Links.Item(1).Parent

returns the appointment item where the contacts are connected from
so olContact will contain the appointment object ;-)

Any suggestions??

Tx

Dikbill, The Netherlands,