Direccionar el origen de datos de un Crystal con VB.Net

 Hola (espero estar escribiendo en la carpeta correcta..)

Éstoy desarrollando un sistemita en VB.Net y tengo un reporte simple, todo estaba bien mientras lo desarrollaba en C:\Taller y al usuario se lo instalaba en C:\Taller..., pero ahora lo quieren en red X:\Taller, el sistema comparte la información, pero el reporte aun direcciona a C:\Taller.., el reporte lo creo desde VB.Net y se instala junto con este, mi preguntas son:

Cómo redicciono la fuente de datos?, debo cargar el reporte?, y este debe estar compilado junto al EXE o debe estar separado?

Gracias!

 Segun entiendo tienes 2 problemas, el primero es la ubicacion fisica del reporte, eso se puede solucionar agregando un archivo de configuracion a la aplicacion con la ruta fisica donde debe buscar los reportes, asi ya no lo "casas" con una ruta en especial sino que tienes la posibilidad de cambiarla sin recompilar la aplicacion.

El segundo problema tiene que ver con la fuente de datos pero no especificas si estas usando un servidor de SQL o de que manera comparte la informacion la aplicacion...

Saludos!!!

Grácias Humberto por contestarme.

Tengo un pequeño archivo de configuración (.TXT) donde pongo la ruta de la base de datos que está en access, para ser utilizado por el sistema, pero no sabía que el Crystal pudiera accesarlo para obtener la dirección de la base de datos.

¿De casualidad tienes algún ejemplo?

De antemano gracias

Que tal Morlein!

Nosé si ya lograste resolver tu problema, pero te anexo un poco de codigo que te pudiera ayudar. He generado una funcion que me permite establecer el origen de datos del reporte en tiempo de ejecución.

el objeto gCONFIG contiene la información de la base de datos a la que desea direccionar el reporte.

Function ReporteLogon(ByVal reporte As ReportDocument) As ReportDocument
            Dim rptDataBase As Database
            Dim rptTables As Tables
            Dim rptTable As Table
            Dim rptLogOnInfo As TableLogOnInfo
            Dim rptConnection As ConnectionInfo

            Try
                Cursor.Current = Cursors.WaitCursor
                rptConnection = New ConnectionInfo

                With rptConnection
                    .ServerName = gCONFIG.Server
                    .DatabaseName = gCONFIG.DbSystem
                    .UserID = gCONFIG.Username
                    .Password = gCONFIG.Password
                End With

                rptDataBase = reporte.Database
                rptTables = rptDataBase.Tables

                For Each rptTable In rptTables
                    rptLogOnInfo = rptTable.LogOnInfo
                    rptLogOnInfo.ConnectionInfo = rptConnection
                    rptTable.ApplyLogOnInfo(rptLogOnInfo)
                Next

                Cursor.Current = Cursors.Default
                Return reporte

            Catch ex As DataSourceException
                'Catch ex As Exception
                MessageBox.Show("ReporteLogon :" & ex.Message)
            End Try
        End Function

Espero te sea de utilidad, cualquier cosa estoy a tus ordenes. Saludos codiales.