Ani
hola a todos, estoy intentando crear un informe con Crystal Report ¿alguien podrÃa ayudarme? teneis algun codigo de ejemplo?, porque no tengo ni idea de por donde empezar.
gracias
gracias
Hola, primero debes tener una base de datos, luego en crystal
1. seleccionas nuevo con el asistente de informe (este te guia todos los pasos q tienes q ejecutar)
2. Debes seleccionar el tipo de conexcion q tienes en la base de datos. ejem odbc
3. seleccionas las tablas, luegos los campos q quieres q salgan en el informe.
4. luego insertar la etiqueta para los texto q quieres q salgan fijos en el informe
Espero q te haya podido ayudar...
1. seleccionas nuevo con el asistente de informe (este te guia todos los pasos q tienes q ejecutar)
2. Debes seleccionar el tipo de conexcion q tienes en la base de datos. ejem odbc
3. seleccionas las tablas, luegos los campos q quieres q salgan en el informe.
4. luego insertar la etiqueta para los texto q quieres q salgan fijos en el informe
Espero q te haya podido ayudar...
sabes como se le pasan parametros al informe?? por ejemplo, para que muestre los datos d euna factura en concreto??
Si es desde visual es asi:
necesitas agregar en el formulario el objeto CrystalReport
Private Sub ctlimprimir_Click()
Dim sselection As String
CrystalReport1.Reset
If Me.Combo3 <> "" Then
sselection = " {tabla.campo} = " & Me.cmbcompra & ""
CrystalReport1.ReportFileName = App.Path & "nombreinforme.rpt"
CrystalReport1.ReplaceSelectionFormula (sselection)
CrystalReport1.PrintReport
Else
MsgBox "Faltan datos", vbCritical
End If
End Sub
p/d Espero q t sirva....
necesitas agregar en el formulario el objeto CrystalReport
Private Sub ctlimprimir_Click()
Dim sselection As String
CrystalReport1.Reset
If Me.Combo3 <> "" Then
sselection = " {tabla.campo} = " & Me.cmbcompra & ""
CrystalReport1.ReportFileName = App.Path & "nombreinforme.rpt"
CrystalReport1.ReplaceSelectionFormula (sselection)
CrystalReport1.PrintReport
Else
MsgBox "Faltan datos", vbCritical
End If
End Sub
p/d Espero q t sirva....
