|
|
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
Есть форма Data в ней подчиненая форма Data10 и выводится допустим три записи. Rак получить доступ к ним из модуля. Работает так: Forms!Data!Data10![Pole] Но получаю только первое значение (то которое выделено там), а как получить все три? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 08:37:33 |
|
||
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
Можно через рекордсет Forms!Data.Form.RecordsetClone ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 08:43:11 |
|
||
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
А можно чуть подробней? Хотя бы как получить количество элементов выводящихся в Data10 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 09:02:17 |
|
||
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
В главной форме в том месте где нужно получить кол-во записей низ подчиненной формы писшем что нибудь такое: Dim rs As Recordset: Set rs = Forms!Data!Data10.Form.RecordsetClone и кол-во записей равно: rs.RecordCount можно и работать с этим рекордсетом, искать, считать, редактировать, если он реактируемый. Это в случае, если нужно осуществлять какие-то действия. Если нужно только знать кол-во, то проще будет к-во = Forms!Data!Data10.Form.RecordsetClone.RecordCount ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 09:11:34 |
|
||
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
Спасибо, то что надо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 09:29:29 |
|
||
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
И еще вопрос. А как из этого Recordset получить поля по именам, а не по номерам. Вот так вот работает. Forms!Data!Data10.Form.Recordset.MoveFirst Do Until Forms!Data!Data10.Form.Recordset.EOF ... Forms!Data!Data10.Form.Recordset.MoveNext Loop Но крусор в окне двигает в таблице. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 09:48:04 |
|
||
|
Доступ к подчиненой форме
|
|||
|---|---|---|---|
|
#18+
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("имя поля") ... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 09:54:26 |
|
||
|
|
start [/forum/topic.php?fid=45&msg=32574860&tid=1673623]: |
0ms |
get settings: |
10ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
185ms |
get topic data: |
9ms |
get forum data: |
3ms |
get page messages: |
46ms |
get tp. blocked users: |
1ms |
| others: | 228ms |
| total: | 505ms |
| 0 / 0 |
