tem como gerar 2 paginas do mesmo relatório via código no data reports?

Amigo, pode explicar melhor esta pergunta? sería interessante também vc informar como vc gera seu Datareport, usando DataEnvironment ? ou joga os valores através de uma consulta, um recordset aberto ?.

Caro Jom segue abaixo:

 

Dim RS As New ADODB.Recordset
RS.Open "select * from [Pedidos]where[Cod]&[CodClie]='" & frmPedidos.txtCodPed.Text & frmPedidos.txtCodClie.Text & " '", Conex, adOpenKeyset, adLockBatchOptimistic

 
        With Relpedido
            Set .DataSource = Nothing
                .DataMember = ""
            Set .DataSource = RS.DataSource
   

                 With .Sections("Section6").Controls
                For i = 1 To .Count
                    If TypeOf .Item(i) Is RptTextBox Then
                        .Item(i).DataMember = ""
                        .Item(i).DataField = RS.fields(i - 1).name
                    End If
                Next i
          
           
            End With
           
             With .Sections("Section16").Controls
                For i = 1 To .Count
                    If TypeOf .Item(i) Is RptTextBox Then
                        .Item(i).DataMember = ""
                        .Item(i).DataField = RS.fields(i - 1).name
                    End If
                Next i
          
           
            End With
                           .Show
             
            
                      End With
   

Tem um layout pronto, queria que ele gerasse 2, pois na impressão queria que saissem 2 relatorios do mesmo registro. Desde já agradeço...