Добрый день! Есть форма в access 2010, в которую из sql-сервера тянутся данные по проведённым инструктажам сотрудника. Заполнение полей области данных формы предполагается в коде. Но при выполнении кода, цикл записывает дважды одну и ту же последнюю строку (у сотрудника было два разных инструктажа). Как исправить код, чтобы в область данных записывались обе строки (все, что есть по сотруднику)? Заранее спасибо!
______________________________________

Private Sub Form_Load()

' подключаемся к базе
ConnectToBase

' выбираем нужные записи:
SQLText = "SELECT users_status.status, order_type.type, users_timesheet.order_num, users_timesheet.order_date, users_timesheet.begin_date, users_timesheet.end_date" _
& " FROM order_type INNER JOIN (users_status INNER JOIN users_timesheet ON users_status.id = users_timesheet.status_id) ON order_type.id = users_timesheet.order_id" _
& " WHERE (((users_timesheet.user_id)=14));"

rstZS.Open SQLText, cn, adOpenKeyset, adLockOptimistic

' присваиваем значения запроса в поля формы:
If Not rstZS.EOF Then
rstZS.MoveFirst
Dim i As Integer
For i = 1 To rstZS.RecordCount
Me.ПолеСтатусСотрудника = rstZS.Fields(0)
Me.ПолеТипПриказа = rstZS.Fields(1)
Me.ПолеНомерПриказа = rstZS.Fields(2)
Me.ПолеДатаПриказа = rstZS.Fields(3)
Me.ПолеДатаНачала = rstZS.Fields(4)
Me.ПолеДатаОкончания = rstZS.Fields(5)
rstZS.MoveNext
Next i

End If

End Sub
_________________________________________

http://www.sql.ru/forum/1202898/zapolnenie-oblastidannyh-formy-access-programmnym-sposobom