Visual Basic.NET - PROBLEMA VB.NET con CRYSTAL

 
Vista:

PROBLEMA VB.NET con CRYSTAL

Publicado por Miguel (3 intervenciones) el 26/11/2010 18:19:39
TENGO EL PROBLEMA DE ABAJO O AYUDENME COMO PUEDO HACER UN REPORTE DE UNA VISTA, COMO PUEDO INVOCAR OTRA CONEXION Y COMO LO LLAMO PORFAVOR
TABAJABA ANTES CON CR9 Y vISUAL BASIC, NO TENIA PROBLEMAS.

PERO SE ME COMPLICA AHORA UN POCO


AMIGOS DOY MANTENIMIENTO A PROGRAMA DESARROLLADO POR OTRAS PERSONAS
QUISER AGREGAR UN REPORTE PERO TUBE PROBLEMAS AL GENERAR LA CONEXION Y LA GENERE COMO OLE DB (ADO) EL REPORTE FUNCIONA YA

Pero al momento de jalar el reporte en la maquina que trabajo no me sale error pero en las otras maquinas piede el nombre de la base de datos

Creo que mi conexion este mal por favor denme una ayuda

ReporteFicha1.Load()
ReporteFicha1.DataSourceConnections(0).SetConnecti on("DATA01", "BD_BB", "user", "pwd")

Esta rutina la puse en un CrystalReportViewer1_Load

otra la puse en mi formulario de inicio pero me dio el mismo resultado

Dim Carta As New ReporteFicha
Dim Reporte As New Cartas
Carta.SetDatabaseLogon("user", "pwd")
Carta.DataSourceConnections.Item(0).SetConnection( "DATA01", "BD_BB", False)
Reporte.CrystalReportViewer1.ReportSource = Carta
Reporte.Show()

AYUDENME POR FAVOR
lo he desarrollado en VStudio 2005

SALUDOS MIGUEL
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:PROBLEMA VB.NET con CRYSTAL

Publicado por Damian (824 intervenciones) el 03/12/2010 13:53:05
No dices que Crystal utilizas y tampoco veo los imports.
Yo utilizó el Crystal XI release 2 y el código mas o menos es asi:

Imports CRAXDDRT
Public crApp As New Application
Public crReport As New Report
Dim cadena(3) As String
cadena(0) = ".\SQLEXPRESS"
cadena(1) = "Construccion"
FrCrystal.crReport = FrCrystal.crApp.OpenReport(System.AppDomain.CurrentDomain.BaseDirectory _
& "\Factura.rpt", 1)
For Each FrCrystal.tbl In FrCrystal.crReport.Database.Tables
FrCrystal.tbl.SetLogOnInfo(cadena(0), cadena(1))
Next

FrCrystal se llama mi control que me permite mostrar el reporte. Y despues con este mismo le pasas los parametros, funciones, etc. Por ejemplo:

FrCrystal.crReport.FormulaFields.GetItemByName("Nro").Text = "'" & FrPagCli.NroCta & "'"
FrCrystal.CR.ReportSource = FrCrystal.crReport
FrCrystal.CR.ViewReport()
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar