ник: Kaktus
ничего себе дискуссия................
енто конечно приятно, что задета такая наболевшая тема.................
и людей она интересует, но ощущаю я себя честно говоря не лучшим бразом, как бы слегка малограмотным..................
так вот..........
вернумся к нашим баранам..................
я на форме приляпал кнопку34 и поле35...........
и на "нажате кнопки " повесил следующее....................
Private Sub кнопка34_Click()
Dim rstSrc As Recordset
Set rstSrc = Me.Form.RecordsetClone
If rstSrc.RecordCount < 1 Then ' нет записей в форме
MsgBox "в форме отсутствуют строки", vbInformation, "Ошибка"
Exit Sub
End If '.RecordCount < 1
With rstSrc
.MoveLast
.MoveFirst
End With
поле35.Value = rstSrc.RecordCount
End Sub
но при нажатии выдает ошибку :
compile error
user-defined type not defined.
ну так вот ...............
поумничали теоретически..........
пора бласнуть практическими знаниями..............
подскажите малограмотному самоучке.............
как говориться - сами мы не местные и т.д. и т.п................... 