Data Report как программно заполнить без базы

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
EugenyKorenev
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 01.10.2005 (Сб) 10:27

Data Report как программно заполнить без базы

Сообщение EugenyKorenev » 01.10.2005 (Сб) 12:24

Необходимо напечатать отчет по данным, без использования базы.
программно заполняю рекордсет, затем привязываю его к отчету
function ttt
dim rsDTLS as new ado.recordset
With rsDtls
Set .ActiveConnection = Nothing
.CursorLocation = adUseClient
.LockType = adLockBatchOptimistic
With .Fields
.Append "Group", adBSTR, 50
.Append "Name", adBSTR, 50
.Append "Status", adBSTR, 15
.Append "Work", adBoolean
End With
.Open
'fill with some values
...
.AddNew
.Fields("Name") = Trim(txtName.Text)
...
...
end function


Set dtreport.DataSource = rsDtls
dtreport.Show 1

Все получается, но мне надо чтобы отчет был иерархический, т.е. группировал по полю GROUP, а значения этого поля соответственно в Data REport были GroupHeader-ом. И еще вопрос можно-ли в DataReport вставлять картинки из рекордсета и если можно, как программно вставить картинки в рекордсет. (без связи с базой данных)

Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1

    TopList  
cron