RE:como haga para usar DataReport con dos tablas
lo que hago yo es crear un procedimiento almacenado(nose si conoces de sql)
y haces una consulta asi
Private Sub cmdimpirme_Click()
If impfac = True Then
query ("select A.idarticulo,A.descri,F.dto,F.precio,F.canti,F.importe,F.pagado,F.interes,C.apellido,C.nombre,C.direccion,C.tel,F.impodto,N.idfactu,F.idfactu,N.fecha,F.idcliente from Facturas F, Cliente C,Nrofactura N, Articulos A Where C.idcliente = F.idcliente AND F.Idarticulo = A.idarticulo AND F.idcliente=" & codcli & " AND N.idfactu = F.idfactu AND F.idfactu=" & codfac & "")
impfac = False
End If
End Sub
Private Sub query(sql2 As String)
If rsdyn.State = 1 Then rsdyn.Close
rsdyn.Open sql2, cn, adOpenForwardOnly, adLockReadOnly
fijate que drtfac2 es el nombre del datareport hay pone el tuyo
printer
End Sub
Private Sub printer()
Dim i As Integer
With dtrfac2
Set .DataSource = Nothing
.DataMember = ""
Set .DataSource = rsdyn.DataSource
With .Sections("Section1").Controls
For i = 1 To .Count
If TypeOf .Item(i) Is RptTextBox Then ' fijate q tenes q agregar los textbox necesarios en la parte de detalle y que su nombre sea Section1
'The datamember should be always blank while creating dynamic data reports
.Item(i).DataMember = ""
.Item(i).DataField = rsdyn.Fields(i - 1).Name
End If
Next i
End With
.Show
End With
End Sub
cualquier cosa avisa fede rosario