Aperçu et impression d'un état Crystal Reports 11 [Résolu]

badseyar 11 Messages postés mardi 14 mai 2002Date d'inscription 17 septembre 2007 Dernière intervention - 27 sept. 2005 à 12:05 - Dernière réponse : cs_pcvesoul 123 Messages postés vendredi 21 janvier 2005Date d'inscription 25 juillet 2007 Dernière intervention
- 27 sept. 2005 à 14:22
Bonjour,





j'ai créé un état sous Crystal Reports 11 Developer Edition.


sous VB6, j'essaie d'en faire l'aperçu et l'impression, sans succès.


j'ai tenté d'ajouter le composant "Crystal ActivX report Viewer", mais je n'arrive pas à affecter mon report à cet objet.


sur le net j'ai trouvé quelques exemples avec cet objet : "craxdrt.application", mais impossible de le mettre en application.





un petit coup de main svp





merci d'avance
Afficher la suite 

6 réponses

cs_pcvesoul 123 Messages postés vendredi 21 janvier 2005Date d'inscription 25 juillet 2007 Dernière intervention - 27 sept. 2005 à 12:14
+3
Utile
Voici mon code : je ne sais pas si cela répondra à ta question.

Set Appn = CreateObject("CrystalRunTime.Application")
Set creport = Appn.OpenReport(Chemin & "" & "Export.rpt")
creport.Database.tables.Item(1).Location = Chemin & "" & "Base.mdb"
ReportView.CRViewer.ReportSource = creport
ReportView.CRViewer.ViewReport
ReportView.Show 1
Cette réponse vous a-t-elle aidé ?  
badseyar 11 Messages postés mardi 14 mai 2002Date d'inscription 17 septembre 2007 Dernière intervention - 27 sept. 2005 à 12:29
0
Utile
merci, je l'ai adapté à mon appli, qui est reliée à des tables dbase :



Set Appn = CreateObject("CrystalRunTime.Application")



Set creport = Appn.OpenReport("E:\bdd\Rapport1.rpt")

creport.Database.tables.Item(1).Location = "E:\bdd"

ReportView.Crviewer.ReportSource = creport

ReportView.Crviewer.ViewReport

ReportView.Show 1



malheureusement, sur l'avant dernière ligne, il me met : "erreur
d'éxecution 424 : un objet est requis"tu sais d'où ça peut venir ?
cs_pcvesoul 123 Messages postés vendredi 21 janvier 2005Date d'inscription 25 juillet 2007 Dernière intervention - 27 sept. 2005 à 12:35
0
Utile
tu as pensé à ajouter la feuille "ReportView" (ou "ReportView9" sous XP) ?
cs_pcvesoul 123 Messages postés vendredi 21 janvier 2005Date d'inscription 25 juillet 2007 Dernière intervention - 27 sept. 2005 à 12:57
0
Utile
J'oubliais :

Référence => Crystal Report Viewer ...

Composant => Controle et Objet à rajouter => Crystal Report Viewer ...
badseyar 11 Messages postés mardi 14 mai 2002Date d'inscription 17 septembre 2007 Dernière intervention - 27 sept. 2005 à 13:42
0
Utile
l'objet était bien inséré, j'ai modifié un peu le code et ça fonctionne pour l'aperçu :



Set Appn = CreateObject("CrystalRunTime.Application")

Set creport = Appn.OpenReport("E:\bdd\Rapport1.rpt")

Crviewer.ReportSource = creport

Crviewer.ViewReport



et pour l'impression ça passe aussi, merci bien !!!
cs_pcvesoul 123 Messages postés vendredi 21 janvier 2005Date d'inscription 25 juillet 2007 Dernière intervention - 27 sept. 2005 à 14:22
0
Utile
Au cas où tu ne le saurais pas : en cliquant sur la feuille marron du ReportView et en faisant F4, tu as les options de la feuille, ce qui te permet d'ajouter l'export vers un fichier texte, excel, etc...

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.