Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Доступ к подчиненой форме / 7 сообщений из 7, страница 1 из 1
24.06.2004, 08:37:33
    #32574851
smail
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
Есть форма Data
в ней подчиненая форма Data10 и выводится допустим три записи.
Rак получить доступ к ним из модуля.

Работает так: Forms!Data!Data10![Pole]
Но получаю только первое значение (то которое выделено там), а как получить все три?
...
Рейтинг: 0 / 0
24.06.2004, 08:43:11
    #32574860
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
Можно через рекордсет
Forms!Data.Form.RecordsetClone
...
Рейтинг: 0 / 0
24.06.2004, 09:02:17
    #32574879
smail
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
А можно чуть подробней? Хотя бы как получить количество элементов выводящихся в Data10
...
Рейтинг: 0 / 0
24.06.2004, 09:11:34
    #32574888
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
В главной форме в том месте где нужно получить кол-во записей низ подчиненной формы писшем что нибудь такое:

Dim rs As Recordset: Set rs = Forms!Data!Data10.Form.RecordsetClone
и кол-во записей равно:
rs.RecordCount
можно и работать с этим рекордсетом, искать, считать, редактировать, если он реактируемый. Это в случае, если нужно осуществлять какие-то действия. Если нужно только знать кол-во, то проще будет
к-во = Forms!Data!Data10.Form.RecordsetClone.RecordCount
...
Рейтинг: 0 / 0
24.06.2004, 09:29:29
    #32574915
smail
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
Спасибо, то что надо.
...
Рейтинг: 0 / 0
24.06.2004, 09:48:04
    #32574946
smail
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
И еще вопрос.
А как из этого Recordset получить поля по именам, а не по номерам.

Вот так вот работает.
Forms!Data!Data10.Form.Recordset.MoveFirst
Do Until Forms!Data!Data10.Form.Recordset.EOF

...

Forms!Data!Data10.Form.Recordset.MoveNext
Loop

Но крусор в окне двигает в таблице.
...
Рейтинг: 0 / 0
24.06.2004, 09:54:26
    #32574956
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Доступ к подчиненой форме
smailИ еще вопрос.
А как из этого Recordset получить поля по именам, а не по номерам.

Вот так вот работает.
Forms!Data!Data10.Form.Recordset.MoveFirst
Do Until Forms!Data!Data10.Form.Recordset.EOF

...

Forms!Data!Data10.Form.Recordset.MoveNext
Loop

Но крусор в окне двигает в таблице.

Чтоб курсор не двигал, бери ...RecordSetClone
И лучше его присвоить в другую переменную - проще работать

как по имени поля:
Dim rs as Recordset
Set rs = ...
...
msgbox rs("имя поля")
...
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Доступ к подчиненой форме / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]