Ayuda en Crystal Report
Publicado por pablo (12 intervenciones) el 06/11/2001 02:55:02
Hola necesito ayuda con esto...
El problema principal radica en como mostrar los registros que yo quiero...
Les paso el siguente ejemplo de codigo q escribi
Option Explicit
Private Sub Command1_Click()
Dim var As String
var = Text1.Text
Dim cn As Connection
Dim rs As Recordset
Set cn = New Connection
Set rs = New Recordset
cn.Open "file name=" & App.Path & "\conex.udl"
Dim consulta As String
consulta = "select * from ingresos where ningreso = " & var & ""
rs.Open consulta, cn, adOpenDynamic, adLockOptimistic
CrystalReport1.ReportFileName = "C:\TEMP\prueba.rpt"
CrystalReport1.PrintReport
End Sub
Cuando uso esto, lo unico q hace en el reporte, es, mostrarme todos los registros, como si yo hiciera un select * a la BD.
No se si estara bien hecho en el crystal o el problema es el codigo...
Otra pregunta, el crystal q viene en el cd de visual studio no soporta bases de datos access2000?
Muchas gracias...
El problema principal radica en como mostrar los registros que yo quiero...
Les paso el siguente ejemplo de codigo q escribi
Option Explicit
Private Sub Command1_Click()
Dim var As String
var = Text1.Text
Dim cn As Connection
Dim rs As Recordset
Set cn = New Connection
Set rs = New Recordset
cn.Open "file name=" & App.Path & "\conex.udl"
Dim consulta As String
consulta = "select * from ingresos where ningreso = " & var & ""
rs.Open consulta, cn, adOpenDynamic, adLockOptimistic
CrystalReport1.ReportFileName = "C:\TEMP\prueba.rpt"
CrystalReport1.PrintReport
End Sub
Cuando uso esto, lo unico q hace en el reporte, es, mostrarme todos los registros, como si yo hiciera un select * a la BD.
No se si estara bien hecho en el crystal o el problema es el codigo...
Otra pregunta, el crystal q viene en el cd de visual studio no soporta bases de datos access2000?
Muchas gracias...
Valora esta pregunta
0