Click or drag to resize

IProjectsGetNext Method

Return the next project, or NULL if the end has been reached.

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
SOProject GetNext()

Return Value

Type: SOProject
SOProject – the next project in the collection
Examples

GetNext

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

VB
Dim Proj
Dim Projs
Set objSO = CreateObject("SuperOffice.Application")
If not (objSO is nothing) Then
    set Projs = objSO.Database.Find.ProjectsByName("CRM5 ")
    Proj = Projs.GetFirst()
    While Not Projs.EOF
        msgbox Proj.identity
        Proj = Projs.GetNext()
    wend        
        msgbox "No more project match the search criteria", vbInformation, "SuperCOM"
else
        MsgBox "Unable to connect to database"
end if

See Also