Beschreibung:

Bewegt den Datensatz-Zeiger um einen Datensatz vorwärts.

Rückgabewert:

Bool

Beispiel VBScript:

' Durchläuft alle Datensätze in einem kopierten RecordSet und summiert die Gesamtumsätze. Dieses Beispiel basiert auf der Firmen-Ansicht einer combit_Large-Solution

Dim oRecordSetCopy : Set oRecordSetCopy = cRM.CurrentProject.ActiveViews.ActiveView.CurrentRecordSetCopy

Dim oRecord

Dim nTurnover : nTurnover = 0

If (oRecordSetCopy.MoveFirst() = True) Then

    Set oRecord = oRecordSetCopy.CurrentRecord

    Do

        nTurnover = nTurnover + oRecord.GetContentsValueByName("Turnover")

    Loop Until Not oRecordSetCopy.MoveNext()

    Set oRecord = Nothing

End If

Call cRM.DialogMessageBox("Der Gesamtumsatz der aktuell angezeigten Datensätze beträgt: " & CStr(nTurnover) & " EUR.", "RecordSet.MoveFirst", vbOkOnly)

Set oRecordSetCopy = Nothing

Beispiel C#-Script:

// Durchläuft alle Datensätze in einem kopierten RecordSet und summiert die Gesamtumsätze. Dieses Beispiel basiert auf der Firmen-Ansicht einer combit_Large-Solution

RecordSet recordSetCopy = cRM.CurrentProject.ActiveViews.ActiveView.CurrentRecordSetCopy();

Record record;

double turnover = 0;

if (recordSetCopy.MoveFirst() == true)

{

    record = recordSetCopy.CurrentRecord;

    do

    {

        turnover = turnover + (double)record.GetContentsValueByName("Turnover");

    } while (!recordSetCopy.MoveNext());

    record.Dispose();

}

cRM.DialogMessageBox("Der Gesamtumsatz der aktuell angezeigten Datensätze beträgt: " + turnover.ToString() + " EUR.", "RecordSet.MoveNext", 0);

recordSetCopy.Dispose();