Click or drag to resize

IContactsEOF Property

EOF Indicates the end of the Contacts iteration

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

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
Dim Cont
Dim Conts
Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
    set Conts = objSO.Database.Find.ContactsByName(�SuperOffice�)
    Cont = Conts.GetFirst()
    While Not Conts.EOF
        msgbox Cont.Name
        Cont = Conts.GetNext()
    wend         
    msgbox "No contacts.", vbInformation, "SuperCOM"
else
    MsgBox "Unable to connect to database"
end if
set objSO = Nothing

See Also