Hola, os voy a exponer mi problema de forma clara. Las herramientas que utilizo son:
Visual Basic 6
Crystal Report 9
Access 2003
En visual basic utilizo las siguientes referencias:
Visual Basic For Applications
Visual Basic runtime objects and procedures
Visual Basic objects and procedures
OLE Automation
Microsoft ActiveX Data Objetcs 2.7 Library
Microsoft ActiveX Data Objetcs Recordset 2
Microsoft DAO 3.6 Objet Library
Microsoft Data Formatting Object Library 6
PrinterListView
Crystal Report 9 ActiveX Designer Run Time
Crystal Report Viewer Control 9
Crystal Report 9 ActiveX Designer Design
Mi programa realiza lo siguiente: obtengo una serie de datos que introduzco en una base de datos que esta enlazada con un reporte de crystal report que quiero imprimir.
Las funciones que utilizo son:
Introducir Datos en la Base de Datos
/**************************/
Dim db As Database
Set db = OpenDatabase(App.Path & "\reportes\Tratamientos.mdb")
db.Execute " INSERT INTO Tratamientos " _
& "(NIF,TITULAR, FECHA, CODIGO, PROVINCIA, MUNICIPIO, NOMBRE, POLIGONO, PARCELA, RECINTO, SUPERFICIE) VALUES " _
& "('" & nif & "','" & titular & "', '" & fecha & "','" & codigo & "', '" & provincia & "', '" & municipio & "' , '" & nombre & "','" & poligono & "', '" & parcela & "', '" & recinto & "', '" & superficie & "' );"
db.Close
/**************************/
Mostar Reporte:
/**************************/
mflgContinuar = True
Set crReport = crApp.OpenReport(App.Path & "\Reportes\Tratamientos.rpt", 1)
reporte.ReportSource = crReport
reporte.ViewReport
reporte.Zoom 85
Screen.MousePointer = vbDefault
/**************************/
El problema que tengo es que al instalar el programa en un ordenador sin crystal report me da el error:
"El componente active x no puede crear el objeto"
He probado a instalar todas las librerias habidas y por haber, e instalado crystal report viewer y otras utilidades pero no consigo resolver.
Agradeceria de todo corazon si alguien me pudiera ah¡yudar porque estoy desesperado.
Muchas Gracias de Antemano
