Click or drag to resize

IInterestId Property

internal id The internal id of the contact interest - use this to determine if the contact object actually has a defined contact interest. By using the InterestID property and GetListItem youll be able to retrieve the name (text string) of the interest.

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
int Id { get; }

Property Value

Type: Int32
Long – The database internal ID of the Company interest (contactinterest_id)
Examples

Id

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

This example retrieves the first active interests contactinterest_id, if the company object has active interests.

VB
Dim objSO
Dim result
Dim intID
Dim inttext
Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
    result = objSO.CurrentContact.interests.count
    if result > 0 then
        intID = objSO.currentcontact.interests.Item(1).interestid
        inttext = objSO.Database.GetListItem(enTableContInt, intID).text
        msgbox "Current company first active ContactInterest name: " & inttext, vbInformation + vbOkOnly, "SuperCOM"
    else
        msgbox "The current company has no active interest defined", vbInformation + vbOkOnly, "SuperCOM"
end if

See Also