Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / В чем делать отчеты? / 8 сообщений из 8, страница 1 из 1
24.01.2005, 12:28:03
    #32879728
MegaDimon
MegaDimon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
Как можно в VB6 конструировать отчеты для печати на принтере, чтобы данные не напрямую из БД брать а, например, из переменных в программе?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2005, 12:38:33
    #32879774
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
Делай в HTML и показывай в WebBrowser контроле
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2005, 12:47:54
    #32879808
MegaDimon
MegaDimon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
HTML не подходит по 2 причинам:
1. колонтитулы не задаются
2. текст имеющий фон(не белый) печатается все равно без фона
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2005, 12:58:06
    #32879844
Alexey Kudinov
Alexey Kudinov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
MegaDimonКак можно в VB6 конструировать отчеты для печати на принтере, чтобы данные не напрямую из БД брать а, например, из переменных в программе? А как угодно можно. Возьмите ту отчетную систему, с которой привыкли работать. Она умеет принимать ADO.Recordset в качестве источника данных ? Уверен, что да.
А отвязанный рекордсет сделать и наполнить его данными на основании переменных вы тоже сможете.
Вот вам и ответ.

Ну и как быстрое решение объект Printer
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.01.2005, 08:56:17
    #32881451
Программист-Любитель
Программист-Любитель
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
В HTML кра-а-а-асивый отчет можно сделать. И оформление моментально менять, как тему, за счет подсовывания другого CSS. Разобраться надо пару дней потратить. К тому же сформированный HTML файл - отдельная ценность, его потом куда угодно можно передать для просмотра.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2005, 14:58:24
    #32884888
MegaDimon
MegaDimon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
Alexey Kudinov: вобщето я немного другое имел ввиду, ну ладно. Я скачал уже Active Reports мне в нем надо данные забивать не из Recordset'ов а просто из переменных. Вобщем, как в AR дизайн страницы делать понятно, непонятно как страницы множить если данные не с рекордсетом свезаны. Т.е. нужно к объекту отчет добавить новую страницу. А как незнаю?

Программист-Любитель: с удовольствием бы и сам делал на HTML, но как быть с проблеммами из 3 поста.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2005, 15:34:36
    #32885012
Alexey Kudinov
Alexey Kudinov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
MegaDimonAlexey Kudinov: вобщето я немного другое имел ввиду, ну ладно. Я скачал уже Active Reports мне в нем надо данные забивать не из Recordset'ов а просто из переменных. Вобщем, как в AR дизайн страницы делать понятно, непонятно как страницы множить если данные не с рекордсетом свезаны. Конкретно по AR не отвечу, не работал с ним.
Если есть сложности с данными, к-е не связаны с рекордсетом, так свяжите их.

Какая разница для Recordseta как в него попадут данные ?
Recordset же можно сделать не только путем выполнения запросов к БД.
Вот кусок кода, взятый из "живой" системы, чтобы проиллюстрировать мысль:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
Dim adoRecordsetResume As ADODB.Recordset
Set adoRecordsetResume = New ADODB.Recordset
With adoRecordsetResume
            .Fields.Append "Col1", adVarChar,  400 
            .Fields.Append "Col2", adVarChar,  400 
            .Open

            .AddNew
            .Fields.Item("Col1").Value = LoadCommonResourceString( 1151 )
            .Fields.Item("Col2").Value = p_oCreditProduct.Parent.UID

            .AddNew
            .Fields.Item("Col1").Value = LoadCommonResourceString( 1068 )
            .Fields.Item("Col2").Value = Format(p_oCreditProduct.Parent.Detail.ApplicationDate)

            .AddNew
            .Fields.Item("Col1").Value = LoadCommonResourceString( 1071 )
            .Fields.Item("Col2").Value = Format(p_oCreditProduct.Parent.Detail.AnalysisDate)
            .UpdateBatch
End With
oRM.AddRecordSet adoRecordsetResume, o_Report
o_Report.unbCol1.SetUnboundFieldSource "' ' +{ado.Col1}"
o_Report.unbCol2.SetUnboundFieldSource "' ' +{ado.Col2}"
Это для CrystalReport.
Как видно создается отвязаный Recordset, к-й наполняется данными и передается в отчет, который дизайнится и отображается обычным образом
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.01.2005, 16:00:35
    #32885104
MegaDimon
MegaDimon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
В чем делать отчеты?
Alexey Kudinov спасибо! Идея хорошая, теперь проблемма с генерацией страниц вручную у меня отпала. Recordset - сила! ;)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / В чем делать отчеты? / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 342ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2168287]:
 0ms
get settings:
 7ms
get forum list:
 19ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 35ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 59ms
get tp. blocked users:
 2ms
others: 196ms
total:  342ms
x
x
Закрыть


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