Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    Crystal Report VB e Oracle

    Ciao a tutti , sto creando un programmino che stampa un report fatto con CRXI e usa Oracle 9 .

    Lanciando la stampa da Crystal funziona correttamente.
    Lanciandola da programma ..(ho scaricato un file di esempio da internet sul sito di un lobro che abbiamo acquistato) e mi da errore ...cosa sbaglio?
    Grazie per le risposte! Luca Martini

    Il messaggio di errore che appare e:

    Impossibile cariceare le informazioni del database
    Dettagli:Impossibile caricare la DLL crdb_oracle.dll di database
    Errore nel file c:\....rpt
    Impossibile caricare le informazioni del database


    Vi copio la parte di codice


    Private Sub frmReport_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    Dim Report As New Avenance1
    'Report.RecordSelectionFormula = "{Orders.Order Date} In #" & strStartDate & "# To #" & strEndDate & "#"


    ''Provide database credentials via Report object model
    'Report.SetDatabaseLogon("RISOHEF", "RISOHEF", "ORACLE9IMERCURIO", "RISOHEF")



    Dim Logon As New TableLogOnInfo
    Dim Tbl As Table
    For Each Tbl In Report.Database.Tables
    Logon = Tbl.LogOnInfo
    Logon.ConnectionInfo.ServerName = "ORACLE9iMERCURIO"
    'Logon.ConnectionInfo.DatabaseName = "xtreme"
    Logon.ConnectionInfo.UserID = "RISOHEF"
    Logon.ConnectionInfo.Password = "RISOHEF"
    Tbl.ApplyLogOnInfo(Logon)
    Next Tbl

    'Provide database credentials to subreports
    Dim Subreport As ReportDocument
    For Each Subreport In Report.Subreports
    For Each Tbl In Subreport.Database.Tables
    Logon = Tbl.LogOnInfo
    Logon.ConnectionInfo.ServerName = "ORACLE9iMERCURIO"
    'Logon.ConnectionInfo.DatabaseName = "xtreme"
    Logon.ConnectionInfo.UserID = "RISOHEF"
    Logon.ConnectionInfo.Password = "RISOHEF"
    Tbl.ApplyLogOnInfo(Logon)
    Next 'Tbl
    Next 'Subreport


    Report.RecordSelectionFormula = "{conto_econ_r.c_societa} = '" & Societa & "'"

    'DESTINAZIONE DELLA STAMPA
    Select Case strDestination
    Case "Preview"
    CrystalReportViewer1.ReportSource = Report
    Case "Print"
    Report.PrintToPrinter(1, False, 0, 0)
    Me.Close()
    Case "E-Mail"
    Dim ExportOptions As New CrystalDecisions.Shared.ExportOptions
    Dim EMailOptions As New CrystalDecisions.Shared.MicrosoftMailDestinationOp tions
    ExportOptions.ExportFormatType = ExportFormatType.PortableDocFormat
    ExportOptions.ExportDestinationType = ExportDestinationType.MicrosoftMail
    EMailOptions.MailToList = strEMailAddress
    EMailOptions.MailSubject = "Stampa Avenance"
    EMailOptions.MailMessage = "Stampa Avenance in formato PDF"
    ExportOptions.ExportDestinationOptions = EMailOptions
    Report.Export(ExportOptions)
    Me.Close()
    End Select
    End Sub

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,472

    Moderazione

    Si tratta di VB.NET?

    E' obbligatorio indicare il linguaggio nel titolo, come da Regolamento.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Si vb.net ho risolto comunque il problema . ho cambiato il tipo di database da crystal report non piu' come database oracle ma come ole db per oracle ed e' andato subito.Ciao! Luca

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.