Visual Basic - crystal reports no me muestra todos los valores

Life is soft - evento anual de software empresarial
   
Vista:

crystal reports no me muestra todos los valores

Publicado por dann (7 intervenciones) el 01/04/2013 17:03:16
hola estimados tengo una consulta con el tema de imprecion no logro dar que me muestre los datos de una factura es decir me muestra a imprimir los primeros datos de la factura pero por el numero de factura tengo mas datos el recorset los recorre pero como lo muestro en crystal reports


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Sub consulta1()
 
Data1.DatabaseName = directorio_actual + "administrador.mdb"
Data1.RecordSource = "ingreso_insumo"
Data1.Refresh
Data1.Database.Execute ("delete from " + "ingreso_insumo")
 
 
Dim oConn, RS, sqlmy
Set oConn = New ADODB.Connection
Set RS = New ADODB.Recordset
oConn.Open (conn_string2)
 
sqlmy = "SELECT * FROM ingreso_insumo WHERE num_doc =" & numero
 
RS.Open sqlmy, oConn, 1
If RS.EOF = False Then
    Do While Not RS.EOF
        Data1.Recordset.AddNew
        For H = 0 To 18  ' recorre los campos de la basedato
            Data1.Recordset(H) = RS(H)
        Next H
        Data1.Recordset.Update
        RS.MoveNext
    Loop
End If
 
RS.Close
oConn.Close
 
Set RS = Nothing
Set oConn = Nothing
 
End Sub
Private Sub Command1_Click()
 
consulta1
 
For H = 0 To 10: Report1.DataFiles(H) = "": Report1.Formulas(H) = "": Next H
Report1.WindowTitle = "FACTURA"
Report1.WindowTop = True
Report1.WindowHeight = 800
Report1.WindowWidth = 1200
Report1.ReportFileName = directorio_reportes + "facturas.rpt"
Report1.DataFiles(0) = directorio_actual + "administrador.mdb"
Report1.Action = 1
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

crystal reports no me muestra todos los valores

Publicado por dann (7 intervenciones) el 01/04/2013 19:12:37
alguien me puede dar alguna respuesta si tiene solucion
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

crystal reports no me muestra todos los valores

Publicado por dann (7 intervenciones) el 01/04/2013 20:55:33
de un rut quiero imprimir varios datos de la misma tabla pero el recorset me lanza solamente el primer dato (en la hoja ) como se puede solucionar
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar