用DataReport显示 分组 报表的 问题?

Question

有以下表:table1单位名称       人员
ABC            小王
ABC            小张
DEF            小沈
DEF            小红我想按单位分组.然后在报表中打印如下:
单位名称: ABC
人员:     小王
          小张
单位名称: DEF
人员:    小沈
         小红 
具体怎么实现呢?
我是用代码连接的,不用数据环境.

Answer 1

如果用代码，那么在获取Recordset时，要用到分层查询语句Shape，具体语法可参阅MSDN6.0文档！

Answer 2

给你看一段示例代码吧：
    Dim cnn As New ADODB.Connection
    Dim rst As New ADODB.Recordset    cnn.Provider = "MSDataShape"
    cnn.Open    "Data Provider=MSDASQL;DSN=vfox;uid=sa;pwd=vfox;database=pubs”    rst.StayInSync = FALSE
    rst.Open    "SHAPE  {select * from authors} 
               APPEND ({select * from titleauthor} AS chapter 
               RELATE au_id TO au_id)", cnn这样就建立一个分层的RecordSet，你把他分别绑定到DataReport的DataSource和DataMember属性上就行了，其它的操作一样。