Am 21.10.2011 um 16:11 schrieb Stefan Sicurella:

> ach super… 
> 
> auf jeden Fall bekomme ich so eine URL, aber wie komme ich an die anderen URL 
> Einträge, stehe hier auf dem Schlauch!


Wie wäre es so:

  dim a as new ABAddressBookMBS
  dim p as ABPersonMBS = a.owner
  
  dim m as ABMultiValueMBS = p.valueForProperty(a.kABURLsProperty)
  
  dim u as integer = m.count-1
  for i as integer = 0 to u
    dim label as string = m.labelAtIndex(i)
    dim value as string = m.valueAtIndex(i)
    
    MsgBox label+" -> "+value
  next
  
  

Gruß
Christian

-- 
Real Studio Database Days in Frankfurt/Main am 3./4. November 2011.

Weitere Informationen und Anmeldung auf:
http://www.monkeybreadsoftware.de/realbasic/events/frankfurt-2011-event.shtml








Antwort per Email an