Crystal Reports para Visual Basic 6.0

[mendezjosem]

Tengo una duda, yo puedo usar crystal reports version 9 o 10 en visual basic 6.0 ? pq como que no me deja , yo usaba el 8.5 pero la version 9 para arriba tiene pal de cosas q me gustan, como el justify , etc.... dejeme saber. Gracias

[hernanmdq]

Con la 9 no hay problemas. La 10 no la uses porque tiene problemas en win 98.

[The_Pretorian]

Buenas Noches
Como se comporta el Cristal 11 con VB 6.0
Atte
Jorge Diaz

[mendezjosem]

mano el 11 brega bnnnnnnnnnnnnnn tamb , lo tengo y lo acabo de probar

[samuel_luna29]

Donde puedo bajr el Crystal Report el más actual gracias

[The_Pretorian]

Buenas Tardes:
SI pudieras publicar un ejemplo de como llamar un reporte de cristal 11 desde VB te lo agradeceria.
Atte
Jorge Diaz

Iniciado por mendezjosem

mano el 11 brega bnnnnnnnnnnnnnn tamb , lo tengo y lo acabo de probar

[lop7]

hola...
mira pana asi le funciono a "ENEA" yo no lo he probado pero intentalo... de todas maneras dale una buscadita al foro coloca "crystal report" y te aparecera informacion al respecto

Código:

Dim crystal As CRAXDRT.Application
Dim Report As CRAXDRT.Report

CRViewer.DisplayBorder = False
CRViewer.DisplayTabs = False
CRViewer.EnableDrillDown = False
CRViewer.EnableRefreshButton = False

RS.Open "Select factura.*, detfactura.*, cliente.Empresa, cliente.NIF, cliente.Direccion_Fiscal, cliente.Poblacion_Fiscal, cliente.CP_Fiscal from factura, detfactura, cliente where cliente.Id=factura.Id_Cliente and factura.Id_Factura=detfactura.Id_factura and factura.Id_Factura=" & Id, Cxn, adOpenStatic, adLockReadOnly
Set crystal = New CRAXDRT.Application
Set Report = crystal.OpenReport(App.Path & "\factura.rpt")
Report.DiscardSavedData
Report.Database.SetDataSource RS

CRViewer.ReportSource = Report
CRViewer.ViewReport

Do While CRViewer.IsBusy
DoEvents
Loop

CRViewer.Zoom 100
RS.Close

saludo...
nos vmos...

[lizardo1977]

Hola
yo tengo instalado la version 7 en español y la 8.5 standar en ingles para realizar la exportacion, la verdad es que tengo algunos reportes que son creado desde el proyecto de vb6 que con el tiempo o apenas termino de compilar las dlls de los reportes se me malogran se descuadran los margenes y lo peor es que se desconfigura la pagina que le di por defecto, se supone que cuando le das la impresora y luego la imprimes en los clientes esta por defecto se abre y te deja cambiar la impresora pero mas que lo cambio no me deja, es una complejidad, llevo varios semanas asi, ayudenme por favor
LIZARDO

[yoryomapex]

oyes carnal tengo una bronca te paso el codigo y te digo en que linea no me esta haciendo nada

'Dim report As New CrystalReport2
Dim crystal As CRAXDRT.Application
Dim Report As CRAXDRT.Report


Private Sub Form_Load()

MsgBox imprime.Text2.Text
Text1.Text = imprime.Text2.Text


CRViewer1.DisplayBorder = False
CRViewer1.DisplayTabs = False
CRViewer1.EnableDrillDown = False
CRViewer1.EnableRefreshButton = False

Dim imprime1 As String
imprime1 = "select folio from acciones where fecha_servicio like '%" & Text1.Text & "%'"
If DataEnvironment1.rsacciones.State = 1 Then DataEnvironment1.rsacciones.Close
DataEnvironment1.rsacciones.Open imprime1 AAAqui es donde no me carga la consulta

Set crystal = New CRAXDRT.Application
Set Report = crystal.OpenReport("c:\Documents and Settings\Administrador\Mis Documentos\admin\report1.rpt")

Report.DiscardSavedData
Report.Database.SetDataSource imprime1


CRViewer1.ReportSource = Report
CRViewer1.ViewReport

Do While CRViewer1.IsBusy
DoEvents
Loop

CRViewer1.Zoom 100

no se si me pudieran ayudar soy nuevo en el crystalreport

mil gracias rasa

[funkyjorge]

Iniciado por lop7

hola...
mira pana asi le funciono a "ENEA" yo no lo he probado pero intentalo... de todas maneras dale una buscadita al foro coloca "crystal report" y te aparecera informacion al respecto

Código:

Dim crystal As CRAXDRT.Application
Dim Report As CRAXDRT.Report

CRViewer.DisplayBorder = False
CRViewer.DisplayTabs = False
CRViewer.EnableDrillDown = False
CRViewer.EnableRefreshButton = False

RS.Open "Select factura.*, detfactura.*, cliente.Empresa, cliente.NIF, cliente.Direccion_Fiscal, cliente.Poblacion_Fiscal, cliente.CP_Fiscal from factura, detfactura, cliente where cliente.Id=factura.Id_Cliente and factura.Id_Factura=detfactura.Id_factura and factura.Id_Factura=" & Id, Cxn, adOpenStatic, adLockReadOnly
Set crystal = New CRAXDRT.Application
Set Report = crystal.OpenReport(App.Path & "\factura.rpt")
Report.DiscardSavedData
Report.Database.SetDataSource RS

CRViewer.ReportSource = Report
CRViewer.ViewReport

Do While CRViewer.IsBusy
DoEvents
Loop

CRViewer.Zoom 100
RS.Close

saludo...
nos vmos...

hola amigo estoy implementado este codigo que has posteado pero no puedo adicionar las dos primeras lineas de codigo: Dim crystal As CRAXDRT, tampoco la otra no me la reconce yo estoy utilizando crystal reports XI y visual studio 2010 y agregue a mi proyecto los siguientes archivos: CRVIEWER y CRAXDDRT, estoy haciendo algo mal, por favor ayudame, gracias

[goffys1]

Iniciado por funkyjorge

hola amigo estoy implementado este codigo que has posteado pero no puedo adicionar las dos primeras lineas de codigo: Dim crystal As CRAXDRT, tampoco la otra no me la reconce yo estoy utilizando crystal reports XI y visual studio 2010 y agregue a mi proyecto los siguientes archivos: CRVIEWER y CRAXDDRT, estoy haciendo algo mal, por favor ayudame, gracias

Deberias preguntar en el subforo de .net.. este es de VB clasico.. ahi te pueden ayudar con mas precision.

pero .. agregaste como referencia a Crystal Reports?

Saludos.