把ADO记录集对象Rs中的记录绑定到数据报表

1、数据报表（DataReport）是一个报表帛作工具，通过拖放数据环境(Environment)窗体外的字段可以很容易的生成一个复杂的报表。但是有时能更想直接把数据报表(DataReport)联接到一个ActiveX数据对象（ADO）记录集而不是数据环境中。例如，也许已经用ADO生成一个分层查询，或者也许有一个从事物处理对象中获取记录集的n层应用。那么怎么样才能直接将ADO记录集Rs绑定到数据报表(DataReport)中呢?请看下面详解.说明：首先，用数据环境生成一个分层查询，接下来，在你的查询的基础上生成一个简单的数据报表(DataReport)，并将其绑定到数据环境中。使用数据环境来绑定N

2、WIND数据库（Visual Basic自带的样本数据库），这包括以下步骤：用VB创建一个新的标准EXE项目。在项目中添加一个数据环境，并将其重新命名为deCustomerOrders。将初始连接重新命名为cnNWIND。设置连接以便使用Microsoft.Jet.OLEDB.3.51的OLE数据库工具。在你的机器上定位NWIND数据库。向这个连接添加一条命令，并重新命名为用户（Customers）。设置用户命令来查询用户表。给用户命令添加一条子命令，并命名为订单（Orders）。设置订单命令来查询订单表。在关系表中用CustomerID字段来关联这两条命令。在项目中添加一个数据报表，并重新命

3、名为rptCustomerOrders。将数据报表(DataReport)的DataSource属性设置为deCustomerOrders。将数据报表(DataReport)的DataMember属性设置为用户。右击DataReport，清除“Show Report Header/Footer”。右击DataReport，清除“Show Page Header/Footer”。右击DataReport，选择“Insert Group Header/Footer”。从数据环境的Customers(用户)命令把用户代号（CustomerID）和公司名字（CompanyName）字段拖到Group

4、Header部分上。从数据环境的Orders（订单）命令把订单代号（OrderID）和订单日期（OrderDate）字段拖到Detail部分上。在窗体上添加一个命令按钮（CommandButton）。然后在你的窗体上添加下列代码：Private Sub Command1_Click()rptCustomerOrders.ShowEnd Sub运行这个项目，单击命令按钮（CommandButton），应该看到带有用户和订单信息的报表。 为了直接把数据报表(DataReport)绑定到由数据环境生成的分层记录集，并添加如下代码：Private Sub Form_Load()Dim intCtrl

5、As IntegerWith rptCustomerOrdersSet.DataSource=Nothing .DataMember=”Set.DataSource=deCustomerOrders.rsCustomersWith.Sections(“Section2”).ControlsFor intCtrl=1 To.CountIf TypeOf.Item(intCtrl) Is RptTextBox Or_TypeOf.Item(intCtrl) Is RptFunction Then.Item(intCtrl).DataMember=”End IfNext intCtrlEnd Wit

6、h注意：如果漏掉了第13步和第14步，需要在以上代码中把“Section 2”改为“Section 6”。结论：运行这个项目，会看到用户和订单信息的报表。数据报表(DataReport)使用DataSource和DataMember属性来查找建立报表的顶层命令。例如，如果在数据环境中有一个包含用户，订单和订单细节信息的分层查询，但你仅要显示订单和订单细节信息，那么你应该把DataSource属性设置为数据环境，并把DataMember属性设置为订单命令。在数据报表(DataReport)中每一字段都有两个属性，从而使得数据环境能够判断在报表中显示什么信息：DataMemberDataField

7、使用DataMember属性可以选择包括有你想显示的信息的那一层。而使用DataField属性可以选择你想显示的字段。例如，用户代号字段在用户表和订单表中都有。如果你想要显示用户代号字段及用户信息，就把DataMember属性设置成Customers。而如果你想要显示用户代号及订单信息，就应该把DataMember属性设置为一个空串。当你如第21步所示的那样直接把数据报表(DataReport)绑定到一个记录集对象中，应该把数据报表(DataReport)的DataSource属性设置为记录集对象，并把DataMember属性设为一个空串。对于报表中的字段，应该把顶层记录集信息（在本例中即为用户信息）的DataMember属性设置为一个空串