crystal reports VS vb6

Question

Salut,
je cherche &#224; afficher un &#233;tat crystal report dans une form dans vb6.
j'ai cr&#233;&#233; un &#233;tat avec crystal reports 10 et je cherche &#224; l'afficher pour l'imprimer par la suite.
est ce quelqu'un peux m'aider.
tous les codes qui existent ne marchent pas tr&#232;s bien. je voulais essayer avec CRviewer mais j'ai pas trouv&#233; comment.
URGENT!!!!!!!!!
HELP!!

cs_hassen · Answer

mois j'utilise encore crystal report 8. je sais pas si ce que je vais te dire est appliquable a la version 10.


dans Visual basic : menu projet / ajouter Crystal Report 8


tu lui donnera le chemin de ton report et il creera normalement lui meme une feuille dans visual basic dans la quelle il ya le control CRviewer

Hassen TUNISIE

DeveloppeurVb · Answer

Salut,

En principe ca marche comme ca 

  MDI1.CrystalReportDoc.DataFiles(0) = Nom de la db
   MDI1.CrystalReportDoc.Connect = Nom de la db '
   MDI1.CrystalReportDoc.Password = "sesspswd" & Chr$(10) & Password
   MDI1.CrystalReportDoc.UserName = UTilisateur
   MDI1.CrystalReportDoc.ReportFileName = Fichier Report crystal
   MDI1.CrystalReportDoc.SelectionFormula = instruction SQL de selection

otayara · Answer

je crois que ce n'est pas applicable pour la version 10. en tout cas, je n'ai pas trouv&#233;.

Developpeurvb, j'ai un msg d'erreur objet requis. peux tu d&#233;tailler un peu. qu'est ce que tu veux dire par nom de la db. source de donn&#233;ess ou chemin du fichier.

Zayard · Answer

J'utilise Vb6 avec la version 9.0 de Crystal Report et voici le code de form load de la feuille &#224; laquelle j'ai ajout&#233; le contr&#244;le CRViewer91

    Screen.MousePointer = vbHourglass
    Set CrxReport = crxApplication.OpenReport(App.Path & "\Report" & strEtat)
    CrxReport.DiscardSavedData
    Me.Left = 120
    Me.Top = 720
    Me.Height = 9780
    Me.Width = 12360
    CRViewer91.Height = Me.Height - 50
    CRViewer91.Width = Me.Width - 50
    CRViewer91.ReportSource = CrxReport
    CRViewer91.ViewReport
    Me.WindowState = vbNormal
    CRViewer91.Zoom 100
    Screen.MousePointer = vbDefault

J'esp&#232;re que ce code te servira.

otayara · Answer

Zayard, c'est quoi crxApplication. msg d'erreur au niveau de la deuxi&#232;me ligne objet requis.

Zayard · Answer

Il faut faire les d&#233;clarations suivantes au niveau du Module
' Declaration d'un object application
Global crxApplication As New CRAXDRT.Application
' Declaration d'un object report
Global CrxReport As CRAXDRT.Report
Apr&#232;s cela, ton probl&#232;me de message d'erreur devrait &#234;tre r&#233;solu.
Pour utiliser des sous &#233;tats, ce que je n'ai pas encore fait, il faut d&#233;clarer :
Global CrxSubreport As CRAXDRT.Report
et pour personnaliser les requ&#234;tes :
 Global CrFFD As CRAXDRT.FormulaFieldDefinition.
Enfin, tu peux trouver des exemples &#224; l'adresse :
http://www.businessobjects.com/products/dev_zone/

Crystal reports VS vb6

6 réponses

Discussions similaires