Crystal Report - Crystal Reports ayuda por favor

 
Vista:

Crystal Reports ayuda por favor

Publicado por Luís Alberto (1 intervención) el 26/07/2007 14:17:41
He conseguido el Visual Basic, versión 6.0 y son copias de un original, solo que me enviaron los CDs, numerados del 1 al 6. en cual de ellos puedo encontrar el Crystal? y cual es la versión que trae?, pues agradezco mucho sus comentarios y ayuda como también todo lo referente a la instalación del crystal. muchas gracias
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
sin imagen de perfil

RE:Crystal Reports ayuda por favor

Publicado por waraltca (7 intervenciones) el 30/07/2007 22:40:33
buenas Luís Alberto...

El crystal muy probablemente estaba en el disco #7 q no t dieron... jeje
El crysta reports es una aplicacion externa al visual. No pertenece a microsoft siquiera.

Preguntale a quien t dio los discos del visual.. si te puede dar tambien el del crystal.

salu2
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

RE:Crystal Reports ayuda por favor

Publicado por Luís Alberto (1 intervención) el 30/07/2007 23:14:08
pues mira, en realidad había estado en el disco # 3, solo que estaba dentro de otras subcarpetas y había que buscarlo, no como un instalador autorun, sino como un simple archivillo, lo encontré, lo instalé y ahora estoy estancado en el proceso de impresión, justamente aquí me da el error:

Private Sub imprimir_Click()
If DataCombo1 <> "" Then

If strCadena <> "" Then
strCadena = strCadena & " and "
End If
strCadena = strCadena & "{totales.newmatricula} = " & txt_newmatricula

MDIprobando.reporte.SelectionFormula = ""
'MDIprobando.reporte.SelectionFormula = strCadena
MDIprobando.reporte.Destination = crptToPrinter
MDIprobando.reporte.DataFiles(0) = "C:\encanto\integrl.mdb"
MDIprobando.reporte.WindowTitle = "Papel"
MDIprobando.reporte.WindowState = crptMaximized
MDIprobando.reporte.ReportFileName = "C:\encanto\rpt\datosgen1.rpt"

MDIprobando.reporte.Action = 0
'AQUÍ me da error 20536 en tiempo de ejecución con la opción 1 o 0

ErrHandler:
If Err.Number = -2147206461 Then
MsgBox "El archivo de reporte no se encuentra, restáurelo de los discos de instalación", _
vbCritical + vbOKOnly

End If

Else
MsgBox "Por favor elija un curso para imprimir", vbOKOnly
End If
End Sub

si conoce alguna forma de desatascarme agracezco mucho su ayuda de antemano, saludos cordiales.
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

RE:Crystal Reports ayuda por favor

Publicado por Diego (1 intervención) el 02/08/2007 15:21:18
Que error te da? el texto me refiero.
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

RE:Crystal Reports ayuda por favor

Publicado por Luís Mercado (31 intervenciones) el 08/08/2007 20:51:00
Disculpa la gran demora por responder, tuve inconvenientes con mi equipo, ahora te respondo sobre el mensaje que me sale:

"error 20536 en tiempo de ejecución

Imposible de conectar: registro de parámetros incorrectos.

por si necesitas toda la codificación que ahora tengo, porque he realizado una limpieza de cosas innecesarias, aquí lo pongo:

Private Sub imprimir_Click()
If DataCombo1 <> "" Then
'strFormula = "({curso}=' " & DataCombo.Text & " ')" desactivado
strlistado = "Listado Generales de Alumnos"
strtitulo = "Listado por curso"
rport = "c:\encanto\rpt\datosgen1.rpt"

With MDIprobando.reporte
.ReportFileName = rport
.SelectionFormula = ""
' .SelectionFormula = strFormula desactivado
.DataFiles(0) = "C:\encanto\integrl.mdb"
.WindowTitle = strtitulo
.Destination = crptoprinter
.Action = 1 - AQUÍ EL ERROR
End With
Else
MsgBox "Por favor elija un curso para imprimir", vbOKOnly
End If

Pues Gracias Diego por tu ayuda y espero tu amable respuesta.

Saludos Luis Alberto
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