Ուղղորդիչ:  Առաջին մակարդակ Web-Service.Offset

Ամբողջական ցանկի բեռնման օրինակ (Visual Basic .NET)

 

    Public Sub GetPatnersList()

        Using client = New AccountanteServiceClient

            client.Open()

            Dim sessionId = client.StartSession("Admin", "", "", "")

            Dim seqNumber As Integer = 1

            Dim chunk = client.GetPartnersList(sessionId, seqNumber, "", False, False)

            seqNumber += 1

            Do While chunk.Offset + chunk.Rows.Count < chunk.Total

                chunk = client.GetPartnersNextChunk(sessionId, seqNumber)

                seqNumber += 1

            Loop

            client.StopSession(sessionId)

        End Using

    End Sub