Dim cuContacts As List
cuContacts.Initialize
For Each c As Contact In cU.GetAll(True,False)
Dim Epafh As ep
Epafh.DisplayName=c.DisplayName
Epafh.Id=c.Id
cuContacts.add(Epafh)
Next
cuContacts.SortType("DisplayName",True)
the cu.getall does not return anything
Epafh is a type declared at startup