Click or drag to resize

IRelationsEOF Property

Return true after last item is read

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

Property Value

Type: Boolean

True when the end of the iteration is reached.

False as long as there are more items to fetch.

Examples

EOF

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

VB
Dim objSO
Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
    set Relations = objSO.CurrentContact.GetRelations
    Set Relation= Relations.GetFirst()
    While Not Relations.EOF
        msgbox Relation.ActiveText
        set Relation = Relations.GetNext()
    wend          
    msgbox "No more relations defined on the current contact", vbInformation, "SuperCOM"
else
    MsgBox "Unable to connect to database"
end if

See Also