Re[3]: VB6.0 Отчеты. Можно ли DataReport без DataEnvironment
От: Peter Fleischer Германия www.informtoools.de
Дата: 07.04.04 01:09
Оценка: 16 (2)
Здравствуйте, Аноним, Вы писали:

А> Спасибо я понял уже все работает, возник только вопрос а как сделать CrossReport. Поясняю, к примеру есть родители и дети. Связь у одного родителя(пусть будет отец) много детей, чтобы отображало родитель и всех его детей. Как это сделать, ведь у 1 отчета 1 DataSource. В общем неясен этот момент.



Recordset двухуровневой:

rs1.Open " SHAPE APPEND New adInteger As PK," & _
" New adVarChar(20) As F12," & _
" New adVarChar(20) As F13," & _
" ((SHAPE APPEND New adInteger As FK," & _
" New adInteger as F22," & _
" New adInteger as F23," & _
" New adVarChar(20) As F24)" & _
" RELATE PK TO FK) as Cmd2", _
, adOpenStatic, adLockOptimistic

rs1 — Master

Set rs2 = rs1.Fields("Cmd2").Value — Child

репорт это понимает!

Peter
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.