Как заполнить ленточную форму значениями из recordset?
|
|
Суббота, 15 Марта 2014 г. 21:49
+ в цитатник
Доброго времени суток. Помогите решить задачку - надо заполнить ленточную форму значениями из recordset. При этом в форме не делать привязку контролов к конкретным полям. Создал цикл для прохождения по записям recordset, но как на каждой итерации создавать новую запись в ленточной форме?
вот кусок кода:
Set rs = CurrentDb.OpenRecordset("SELECT * FROM t_hist WHERE t_hist.taskId = " & idTask)
If rs.RecordCount > 0 Then
Dim fh As Form_f_hist
Set fh = Me.f_hist.Form
rs.MoveFirst
For i = 0 To i = rs.RecordCount
fh.editDateHist.Value = rs!histDate
fh.editSotrName.Value = rs!sotrId
fh.editHistDsc.Value = rs!histDsk
rs.MoveNext
i = i + 1
Next
End If
http://www.sql.ru/forum/1082816/kak-zapolnit-lentochnuu-formu-znacheniyami-iz-recordset
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-