vb6 , crystal reports 9 y mysql (Conexión a base de datos del reporte)
Alejandro Álvarez
Alguién que haya usado código en tiempo de dise ño, para ejecutar un reporte
y a la vez cambiar la ubicación de la base de datos de mysql en tiempo de
diseño, esto con la finalidad de
poder bajar la información de diferentes servidores...
saludos!
Mario V.
A ver si puedo ayudarte pero yo uso con CR 7
Salu2
Mario
"Alejandro Álvarez" <alexa...@hotmail.com> escribió en el mensaje
news:62AA4FAC-1F40-4B69...@microsoft.com...
Alejandro Álvarez
Estuve usando buen tiempo, cambio de ubicación de base de datos pero con
access, y no tengo problema
ahora la situación es que estoy trabjando con mysql
te agradezco de ante mano tu pronto apoyo
saludos
"Mario V." <mrvu200...@ESTO-yahoo.com> escribió en el mensaje de
noticias:ebAOfp7k...@TK2MSFTNGP03.phx.gbl...
Mario V.
Access y el metodo que usas del reporteador
algunos prefieren incluir sus reportes en el proyecto
yo personalmente dejo los RPTs por fuera y los conecto mediante DSN
a mi me parece la forma mas optima
Con DSN no importa la base que utilices
si es tu caso te puedo enviar las rutinas que uso o un ejemplo en particular
para que te guies
salu2
Mario
"Alejandro Álvarez" <alexa...@hotmail.com> escribió en el mensaje
news:9356C599-344A-4EB9...@microsoft.com...
Alejandro Álvarez
te paso la rutina como controlo la ubicación de la base de datos
wNomrep="reportexyz.rpt"
Bibreportes = "ubicación...."
pathd= "ubicación de base de datos... esto porque manejo diferentes
empresas"
ahora el código que tu usas, creo que si me va a ser útil, ya que también
manejo dns
y controlo una base de datos para cada empresa, por lo tanto el proceso de
reportes, identifica que empresa se está
utilizando...
Gracias!
------------------------------------------------------------------------------------------------------------
Set crReporte = cr9App.OpenReport(BibReportes & UCase(wNomRep), 1)
GoSub Localizacion 'Asigna localizacion de base de datos
'ya parametrizado el reporte.
crv9 .ReportSource = crReporte
crv9 .ViewReport
End With
Exit Sub
'=========================================================================================
'Rutina para asignar el path y la contraseña de las base de datos
'=========================================================================================
Localizacion:
Dim MyServerName As String
Dim MiBaseDatos As String
For Each crDBTable In crReporte.Database.Tables
MiBaseDatos = Right(crDBTable.LogOnServerName, 10)
crDBTable.SetLogOnInfo "", PATHD & MiBaseDatos, "", PwBase
Next crDBTable
Return
Alejandro Álvarez
MIra ya use tu proyecto, funciono muy bien,
ya encontre una forma para cambiar de dsn, sin embargo me gustaría, no usar
esta opción, ya que en cada pc, tendría que tener el dsn, instalado
por lo pronto ya puedo seleccionar a que servidor y base de datos dirigirme
saludos y estamos en contacto
"Mario V." <mrvu200...@ESTO-yahoo.com> escribió en el mensaje de
noticias:uJn24F4l...@TK2MSFTNGP02.phx.gbl...
> Hola Alejandro
>
> Te paso un pequeño ejemplo que lo hice sacando 'pedacitos' de una
> aplicacion mia
>
> Utiliza el driver: MySQL ODBC 3.51 Driver
> Version de Crystal Reports 7
> Base de Datos: MySQL 4.1.1 alpha
> Tienes que crear un DSN llamado "MySQL_Ejemplo" que apunte a la base
> "Ejemplo"
> Te incluyo un Script para la creacion de la base de datos y una tabla con
> datos
>
>
> Espero que te sirva de guia
> Avisame si te sirvio o tienes alguna duda
>
> Salu2
> Mario
>
>
>
> "Alejandro Álvarez" <alexa...@hotmail.com> escribió en el mensaje
> news:046EB1D2-C257-4A49...@microsoft.com...
Mario V.
Salu2
Mario
"Alejandro Álvarez" <alexa...@hotmail.com> escribió en el mensaje
news:F473ADF7-7A43-482C...@microsoft.com...