Нужно использовать перемещение курсора по записям: MoveFirst, MoveNext, MovePrevious (если курсор не настроен для перемещения только вперёд) и MoveLast. Например:
|
Visual BasicВыделить код |
|
rs.MoveFirst
Do Until rs.EOF
поле5=rs.fields(4)[.Value]
rs.movenext
Loop | |
|
