Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it
    Registrato dal
    Jan 2005
    Messaggi
    49

    Database smarrito con crystal report (VB6)

    Ho realizzato nella mia applicazione dei report con crystal report 8.
    Tutto è andato liscio sino a quando ho importato i report nell'applicazione. Ho fatto Progetto\Inserisci Crystal report 8, dal menù principale dell'IDE. Dalla finestra apparsa ho selezionato "Aggiungi report da report esistente" e ho inserito il percorso per individuare i file .rpt da me creati. Tutto sembrava funzionare sino a quando non ho notato che nonostante associ un report ad un recordset, con il metodo "setdatasource", CR cerca il database nella posizione in qui era inserito, se non lo trova mi da errore: "File non trovato". Ora i miei quesiti sono:

    Perchè se ho associato un recordset come origine di dati a CR tramite codice, CR cerca il database?

    Come faccio a risolvere il problema, senza dover obbligare l'utente ad istallare il mio programma in una directory precisa?

    Mille grazie per ogni vostro eventuale aiuto.

  2. #2
    Utente di HTML.it L'avatar di Brainjar
    Registrato dal
    Nov 2004
    Messaggi
    1,162
    Ho usato Crystal Report fino alla versione di vb 4.0 16 bit
    senza avere problemi.
    Poi dalla versione 4.0 32 ho avuto anch'io lo stesso problema.
    In pratica avevo il messaggio di errore relatico al database.
    Ho risolto tramite un esempio di demo di CR. Prova a settare nel codice il database :

    codice:
            Dim LocText as String
            LocText = LCase$(App.Path)
            If Right$(LocText, 1) <> "\" Then LocText = LocText + "\"  'handles the root
            Report1.SelectionFormula = ""
            Report1.DataFiles(0) = LocText$ + "MioDB.mdb"
            Report1.ReportFileName = App.Path & "\MioReport.rpt"
            Report1.CopiesToPrinter = 1
            Report1.Destination = 1
            
            If MsgBox("Stampa del Report ? ", vbYesNo, "Stampa") = vbYes Then
                Report1.Action = 1
            End If
    In VB 6.0 mi sono creato un editore di report visuale ed una
    dll da incorporare nei miei progetti che sostituiscono in
    pratica CR.

    Ciao,
    Ciao, Brainjar

  3. #3
    Utente di HTML.it
    Registrato dal
    Jan 2005
    Messaggi
    49
    Ma perchè mi dice membro "non trovato" anche se ho inizializzato:

    Dim report1 As New CrystalReport1

    Bhoo!

  4. #4
    Utente di HTML.it L'avatar di Brainjar
    Registrato dal
    Nov 2004
    Messaggi
    1,162
    Se non ricordo male, il CristalReport è un componente. Per cui
    dovresti averlo fisicamente sul form. come , ad esempio, un oggetto
    CommonDialog. Lo vedi in fase di disegno ma a runtime è invisibile.
    Ciao,
    Ciao, Brainjar

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 © 2026 vBulletin Solutions, Inc. All rights reserved.