|
Действия ...
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
20.10.2006, 15:26
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
Подскажите плиз, как вывести в один отчет данные из нескольких не связанных таблиц ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
22.10.2006, 14:12
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
что из себя представляет отчёт на чём написан откуда идут данные в ADO.Recordset есть метод NextRecordSet(возвращает следующий Recordset ) если например в sql получать несколько несвязных select-ов то перебором NextRecordSet можно их все получить использовать еще обьект/ы ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 09:19
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
2 несвязанные таблицы (перечень опор и проводов ), в одном datareporte отобразить эти перечни (опор и проводов) можно ли это сделать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 12:43
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
если всё-таки попытаться связать данные из этих таблиц то можно создать свой иерархический рекордсет и его можно запихнуть в один DataReport в VB6 данные в виде иерархии иначе не уверен что это возможно или создать свой контроль ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 13:23
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
datareport для иерархического sql получается, если в иерархии 1 подзапрос .... а если 2 то не получается ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 13:28
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
не я имел ввиду свой иерархический рекордсет заполнение данных происходит в ручную и в принципе ограничение на уровни нет возможно долгая работа я в своё время сделал такой рапорт на 8 уровней но данные были связанны между собой ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 13:55
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
можно примера, если не трудно, у меня что-то не получается ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 14:05
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
Щас надо найти ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 14:15
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
тут 4 уровня иерархии данные для примера ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 14:25
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
огромное спасибо, сейчас разберусь ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 15:42
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
не получается на 2 уровне два SQL запроса .... и второй не видет de2.S_KOM_Pr SelLEPDispNum, Trim$(F_LEP6.MSHFlexGrid2.Text) Set rs1 = de2.rsS_KOM_Pr.Clone de2.rsS_KOM_Pr.Close Set rsCh1 = rs1.Fields(2).value Set rsCh2 = rs1.Fields(3).value Set DataReportPassp.DataSource = rs1 DataReportPassp.Sections("Section1").Controls("T1").DataMember = "Sel_OPOR" DataReportPassp.Sections("Section1").Controls("T1").DataField = rsCh1.Fields.Item(4).NAME DataReportPassp.Sections("Section1").Controls("T2").DataMember = "Sel_OPOR" DataReportPassp.Sections("Section1").Controls("T2").DataField = rsCh1.Fields.Item(3).NAME эту часть не видет DataReportPassp.Sections("Section1").Controls("T3").DataMember = "Sel_TRAV" DataReportPassp.Sections("Section1").Controls("T3").DataField = rsCh2.Fields.Item(4).NAME DataReportPassp.Sections("Section1").Controls("T4").DataMember = "Sel_TRAV" DataReportPassp.Sections("Section1").Controls("T4").DataField = rsCh2.Fields.Item(3).NAME ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 17:21
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
Давай завтра посмотрим что нужно сделать ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.10.2006, 17:40
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
ok ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 12:14
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
я сейчас попробую создать такой рекордсет из базы ...... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:02
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
SlySv я сделал но нужно обьяснить ты готов(а) принять истину ?? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:06
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
да готова ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:08
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
сейчас напишу подробно ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:20
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
если в нашем примере нет связи между таблицами то мы создаём фиктивную связь в двух таблицах добавляем поля Link в таблицу 1 значение '0' в таблицу 2 значение '*' (условно) нам нужно в отчёте показать сначало все значения из таблицы 1 а потом из в таблицы 2 то есть связать нужно только последную запись из в таблицы 1 со всеми значениями из таблицы 2 в VB получаем в рекордсет через Shema-запрос получаем значения и для последней записи в верхнем рекордсете меняем значение в поле Link на * рекордсет отключенный DataMember=С я так определил в запросе база у меня в SQL 2000 может придется менять ConnectionString для подключения для других баз структрура таблиц A1 id text Link 1 A1 0 2 A2 0 3 A3 0 4 A4 0 5 A5 0 A2 id2 text2 Link 1 B1 * 2 B2 * 3 B3 * 4 B4 * 5 B5 * 6 B6 * получилось немного сложно но зато 2 не связанные таблицы в один рапорт Прошу прощения за мой русский язык ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:22
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
забыл пример ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:26
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
>в VB получаем в рекордсет через Shema-запрос получаем значения >и для последней записи в верхнем рекордсете меняем значение в поле Link на * >рекордсет отключенный эта часть непонятно ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:30
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
Str = "SHAPE {SELECT * from A1 } AS A " _ & " APPEND ({ SELECT * from A2 } as B " _ & " RELATE Link to Link ) as C " это запрос с использованием SHAPE rs1.ActiveConnection = Cn rs1.CursorLocation = adUseClient rs1.CursorType = adOpenDynamic rs1.LockType = adLockOptimistic rs1.Source = Str rs1.Open открыть рекордсет Set rs1.ActiveConnection = Nothing отключить рекордсет от базы данных rs1.MoveLast последняя запись rs1("link").Value = "*" поменять значение последней записи и тем самым создать связь со второй таблицей rs1.Update сохранить изменения ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:43
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
есть таблица S_TAB1....есть еще 2 таблицы S_TAB2 и S_TAB3 эти две таблицы связаны с таблицой S_TAB1 (двумя полями) ....те иерархаический recordset....вот и в datareport таблица S_TAB2 печатается а S_TAB3 нет (не находит) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:48
|
|||
|---|---|---|---|
Datareport and несколько таблиц |
|||
|
#18+
S_TAB2 и S_TAB3 на одном уровне иерархии ?? Они должны быть в одном запросе ??? идея моя подходит ?? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
24.10.2006, 13:50
|
|||
|---|---|---|---|
|
|||
Datareport and несколько таблиц |
|||
|
#18+
S_TAB2 и S_TAB3 на одном уровне иерархии...в одном запросе S_TAB1 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&tablet=1&tid=2165071]: |
0ms |
get settings: |
10ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
182ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
57ms |
get tp. blocked users: |
1ms |
| others: | 246ms |
| total: | 528ms |
| 0 / 0 |
