Crear un reporte de 2 bases distintas
Publicado por Nicolás (24 intervenciones) el 18/10/2006 04:13:15
Saludos:
He creado un reporte con CR9 que utiliza 3 tablas, 2 de una base de datos ACCESS 2000 "X" y 1 de una base de datos ACCESS 2000 "Y". En el diseñador anda perfecto, ahora cuando quiero llamarlo desde VB6 crea un error de C++. El problema lo tengo cuando quiero utilizar las distintas bases. Esto es: las 2 tablas de la base "X" son fijas, pero la base "Y" varía (la base de datos varía, pero la tabla a referenciar tiene la misma estructura en cualquier base).
Como se cambia la dirección de la base a la que tiene que hacer referencia el reporte en tiempo de ejecución en VB6?
Yo utilicé el siguiente código pero sin resultados positivos:
CrRep.Database.Tables(1).SetDataSource "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BASES\BasePrincipal.mdb;Jet OLEDB:Database Password=001;"
CrRep.Database.Tables(2).SetDataSource "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BASES\BasePrincipal.mdb;Jet OLEDB:Database Password=001;"
CrRep.Database.Tables(3).SetDataSource "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BASES\BaseVaria.mdb;Jet OLEDB:Database Password=002;"
Desde ya, muchas gracias.
He creado un reporte con CR9 que utiliza 3 tablas, 2 de una base de datos ACCESS 2000 "X" y 1 de una base de datos ACCESS 2000 "Y". En el diseñador anda perfecto, ahora cuando quiero llamarlo desde VB6 crea un error de C++. El problema lo tengo cuando quiero utilizar las distintas bases. Esto es: las 2 tablas de la base "X" son fijas, pero la base "Y" varía (la base de datos varía, pero la tabla a referenciar tiene la misma estructura en cualquier base).
Como se cambia la dirección de la base a la que tiene que hacer referencia el reporte en tiempo de ejecución en VB6?
Yo utilicé el siguiente código pero sin resultados positivos:
CrRep.Database.Tables(1).SetDataSource "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BASES\BasePrincipal.mdb;Jet OLEDB:Database Password=001;"
CrRep.Database.Tables(2).SetDataSource "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BASES\BasePrincipal.mdb;Jet OLEDB:Database Password=001;"
CrRep.Database.Tables(3).SetDataSource "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\BASES\BaseVaria.mdb;Jet OLEDB:Database Password=002;"
Desde ya, muchas gracias.
Valora esta pregunta
0