por favor necesito ayuda y en ningun sitio me contestan

[armaggedon]

pos eso tengo un problema soy novato y estoy gestionando una sencilla bd desde visual basic he realizado un reporte desde crystal report XI con imagenes dinamicas pero no se como enlazarla al control crystal activex viewer XI yo he enlazado reportes con la version 8 con la instruccion nombre_control.action=1
y ya se visualizaba el reporte pero en esta nueva version en la propiedades no viene nada a donde enlazar
os agradeceria que me ayudarais ya que he pedido ayuda en muchos foros y nadie me a contestado

gracias de antemano

[Insomnia]

Hola

Te indico como lo realizo con el CR 10, espero que funcione

Código:

Dim RegInfo As New ADODB.Recordset
Dim CrxInfor As CRAXDRT.Report
Dim CrxApp As New CRAXDRT.Application

Private Sub Form_Load()
    
    bd.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Ruta & ";Persist Security Info=False;Jet OLEDB:Database Password=1234"
    
    RegInfo.Open "SELECT cod, Archivo from erroreak", bd, adOpenDynamic, adLockReadOnly
    Screen.MousePointer = 11
    
    Set CrxInfor = CrxApp.OpenReport(App.Path & "\informiek\erroreak.rpt")
    
    CrxInfor.DiscardSavedData
    CrxInfor.Database.SetDataSource RegInfo
    
    With CrystalActiveXReportViewer1
        .ReportSource = CrxInfor
        .EnableExportButton = True
        .DisplayGroupTree = False
        .EnablePopupMenu = False
        .EnableDrillDown = False
        .EnableSelectExpertButton = False
        .ViewReport
        .Zoom 100
    End With
    
    Screen.MousePointer = 0

End Sub

Espero que sea lo mismo para el CR 11 y te sea útil .

--Saludos--

[armaggedon]

mi base de datos es access 97 y programo en dao no en ado como creo que esta hecho esto no, no me funciona pero muchas gracias por todo ya que eres el unico que me ha contestado por ahora

[Insomnia]

Hola

Si, yo programo en ADO, pero de todas formas tiene que ser algo similar, al final lo que se hace es pasar el contenido del RecordSet al CrxInfor y para abrir el informe tiene que ser igual

Código:

Set CrxInfor = CrxApp.OpenReport(App.Path & "\informiek\erroreak.rpt")

Modificando y haciendo pruebas puede que consigas adaptarlo.

P.D. Te aconsejo cambiar de DAO a ADO, es mucho mas estable, genera menos errores,... y la BD como quieras, yo utilizo Access XP.

--Saludos--

[GeoAvila]

en las faq's hay un ejemplo.. creo yo..

nos vemos..

[armaggedon]

gracias por todo ya me lo solventaron muchas gracias a todos