Click or drag to resize

IContactGetPersons Method

Get the persons attached to this contact. Hidden persons are filtered out.

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
SOPersons GetPersons()

Return Value

Type: SOPersons
SOPersons – a collection of person objects
Examples

GetPerson

This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.

VB
Dim objSO
Dim collPers
Dim per
Dim msg 

Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
    Set collPers = objSO.CurrentContact.GetPersons()
    For Each per In collPers
        msg = msg & per.FirstName & " " & per.LastName
        msg = msg & Chr(13) & Chr(10)
    Next
    MsgBox msg, vbInformation + vbOKOnly, "SuperCOM"    
Else
    MsgBox "Unable to connect to database"
End If
Set objSO = Nothing

See Also