RychlejÜφ naΦφtßnφ recordsetu
Postup:
Pom∞rn∞ b∞₧nß v∞c je pou₧φvat p°i naΦφtßnφ recordsetu
nßsledujφcφ cyklus:
Do While
Not De.rssRecordSet.EOF
... naΦφtßnφ
De.rssRecordSet.Movenext
Loop
A tady je
ten problΘm ... po ka₧dΘm MoveNext se databßzovΘ jßdro dotazuje, zda
nenφ EOF ... ╚ili p°i v∞tÜφm recordsetu to m∙₧e d∞lat t°eba
i tisφckrßt .... Nßsledujφcφ metoda mi na velkΘm recordsetu b∞₧ela
asi o 40% rychleji:
De.rssRecordSet.MoveLast
intCount=De.rssRecordSet.RecordCount
De.rssRecordSet.MoveFirst
For i=1
To intCount
... naΦφtßnφ
De.rssRecordSet.MoveNext
Next i