Una ayudita por favor.
Publicado por Luís Alberto (49 intervenciones) el 21/08/2007 21:19:10
Pues gracias a todos por el foro, estoy queriendo hacer un reportecillo en VB 6.0, y el archivo de reporte lo he creado en Crystal 4.6 (el que viene con el visual). en el reporte (datosgen1.rpt) lista todos los alumnos de un colegio, y para filtrar por cursos he creado un formulario con un datacombo1, donde se puede elegir el curso: ahora esta es la codificación que he puesto en el botón imprimir:
Private Sub imprimir_Click()
If DataCombo1 <> "" Then
strFormula = "({curso}='" & ensayo.DataCombo1.Text & " ')"
strlistado = "Listado Generales de Alumnos"
rlistado = "c:\encanto\rpt\datosgen1.rpt"
With MDIprobando.reporte
.ReportFileName = rlistado
.SelectionFormula = strFormula
.DataFiles(0) = "C:\encanto\integrl.mdb"
.WindowTitle = "Listado por curso"
.Destination = crptToPrinter
.Action = 1 ' aquí me da el error
End With
Else
MsgBox "Por favor elija un curso para imprimir", vbOKOnly
End If
End Sub
el error que me sale es : "error 20536 en tiempo de ejecución" "imposible conectar: registros de parámetros incorrectos"
si alguien con mayor conocimiento que yo, pudiese darme una ayuda pues le agradeceré mucho, quisiera saber cual es el error que he cometido y cual es la alternativa a usarse.
uso una base de datos access 2003, que la convertí con el mismo access a versión 97.
Muchas gracias.
Luís Alberto
Private Sub imprimir_Click()
If DataCombo1 <> "" Then
strFormula = "({curso}='" & ensayo.DataCombo1.Text & " ')"
strlistado = "Listado Generales de Alumnos"
rlistado = "c:\encanto\rpt\datosgen1.rpt"
With MDIprobando.reporte
.ReportFileName = rlistado
.SelectionFormula = strFormula
.DataFiles(0) = "C:\encanto\integrl.mdb"
.WindowTitle = "Listado por curso"
.Destination = crptToPrinter
.Action = 1 ' aquí me da el error
End With
Else
MsgBox "Por favor elija un curso para imprimir", vbOKOnly
End If
End Sub
el error que me sale es : "error 20536 en tiempo de ejecución" "imposible conectar: registros de parámetros incorrectos"
si alguien con mayor conocimiento que yo, pudiese darme una ayuda pues le agradeceré mucho, quisiera saber cual es el error que he cometido y cual es la alternativa a usarse.
uso una base de datos access 2003, que la convertí con el mismo access a versión 97.
Muchas gracias.
Luís Alberto
Valora esta pregunta


0