Comment peut-on exporter un rapport lors de l'utilisation ActiveReports

Je suis une utilisation Active des Rapports au sein de mon programme visual basic pour générer un rapport basé sur mes données. Droit maintenant, j'ai le rapport d'ouverture fine et il permet à l'utilisateur d'imprimer, de copier, de trouver, etc. Je ne sais pas comment ajouter la fonctionnalité pour permettre à l'utilisateur de choisir d'exporter le graphique une fois que le programme est en cours d'exécution.

J'ai été à la recherche à de nombreux tutoriels mais il y a toujours quelque chose qui le rend incapable de travailler dans mon programme. Par exemple cette forum donne le code exact pour ce que je veux ajouter un bouton exporter de la barre d'outils, puis ajoute la fonctionnalité de la touche. Malheureusement, je suis incapable d'accéder à la barre d'outils. Ils y accéder avec Me.Toolbar et je suis incapable d'y accéder de cette façon.

Un autre forum ici ne pas ajouter de l'exportation de la barre d'outils et à la place insère directement dans le code, mais je ne suis pas sûr de ce que d'importer pour me permettre de faire de cette façon que mon projet ne reconnaît pas ActiveReportsPDFExport.ARExportPDF.

Mise à JOUR:

Trouvé un moyen d'exporter au format PDF, en ajoutant à la ActiveReport dans le format de conception d'un DataDynamics.ActiveReports.Export.Pdf.PdfExport et ensuite appeler à partir de mon code PdfExport1.Export(Me.Document, "D:\Kyra\HELP.pdf")

Problème:

Cela est appelé à la fin de ma fonction qui ouvre le rapport actif. Je veux que l'utilisateur puisse choisir d'exporter le rapport, et de donner ensuite la possibilité de choisir le format et l'emplacement où ils veulent sauvegarder le rapport.

InformationsquelleAutor Kyra | 2010-06-10

Ci-dessous est le code pour ajouter un PDF sur le bouton Exporter pour le ActiveReports à l'aide de la Barre d'outils VB.NET et ActiveReports 6:

Const pdfExportToolID As Long = 42

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim myExportTool As DataDynamics.ActiveReports.Toolbar.Button
    myExportTool = New DataDynamics.ActiveReports.Toolbar.Button()
    myExportTool.ButtonStyle = DataDynamics.ActiveReports.Toolbar.ButtonStyle.Text
    myExportTool.Caption = "Export to PDF"
    myExportTool.Id = pdfExportToolID
    Me.Viewer1.Toolbar.Tools.Add(myExportTool)

    ' load report:
    Dim rpt As New NewActiveReport1()
    Me.Viewer1.Document = rpt.Document
    rpt.Run(False)
End Sub

Private Sub Viewer1_ToolClick(ByVal sender As System.Object, ByVal e As DataDynamics.ActiveReports.Toolbar.ToolClickEventArgs) Handles Viewer1.ToolClick
    If (e.Tool.Id = pdfExportToolID) Then
        Dim pdf As New DataDynamics.ActiveReports.Export.Pdf.PdfExport()
        pdf.Export(Me.Viewer1.Document, "C:\users\scott\junk\myActiveReport.pdf")

    End If
End Sub

Ce code fonctionne à l'intérieur d'un formulaire avec un ActiveReports Viewer sur le formulaire nommé "Viewer1".

Espère que cette aide,

Scott Willeke
GrapeCity

InformationsquelleAutor Scott Willeke

2

Il suffit de suivre les instructions ici. Plus précisément, c'est le bouton, ils ajoutent 'cmdExport" qui permet à l'utilisateur de démarrer l'exportation.
- J'ai ajouté un bouton mais je suis incapable de définir la légende ou de l'événement onClick. Le seul cas où il est capable de faire est de 'Éliminés'
- J'ai aussi essayé datadynamics.com/Help/AR2Std/... mais je suis incapable de trouver (dans la boîte à outils ou à ajouter à la boîte à outils) le Contrôle du Visualiseur ActiveX. J'ai trouvé un code qui peut à l'exportation, par hypothèse, (Me.HtmlExport1.À l'exportation(rpt.Document D'Application.StartupPath + "\\HTMLExpt.html")) ) mais je veux que ce soit le choix des utilisateurs et non pas automatiquement. En outre, j'ai trouvé freevbcode.com/ShowCode.Asp?ID=1617 mais je suis incapable d'accéder à la barre d'outils. Quand je vais M'. la barre d'outils ne s'affiche pas.
- Pas sûr si je comprends bien, mais quand vous avez obtenu la forme ouvert dans le concepteur, essayez de double-cliquer sur le bouton et il faut ajouter le gestionnaire de clic automatiquement.
- Je crains que je ne connais pas bien les ActiveReports, j'ai fait des choses très simples, depuis longtemps donc je ne suis pas sûr de savoir pourquoi vous rencontrez ces problèmes.
InformationsquelleAutor Hans Olsson

Ce code de travail pour moi, juste passer Webviewer objet.

ABC.Run();
ARWebViewer.Report = ABC; 

ExportToExcel(ARWebViewer); // call ExportToExcel method, 

public void ExportToExcel(DataDynamics.ActiveReports.Web.WebViewer objWebviewer)

    {
        DataDynamics.ActiveReports.Export.Xls.XlsExport XLSexport = new DataDynamics.ActiveReports.Export.Xls.XlsExport();

        System.IO.MemoryStream memStream = new System.IO.MemoryStream();
        if (XLSexport == null)
            XLSexport = new DataDynamics.ActiveReports.Export.Xls.XlsExport();

        XLSexport.AutoRowHeight = true;
        XLSexport.MinColumnWidth = (float)0.2;
        XLSexport.RemoveVerticalSpace = true;
        XLSexport.UseCellMerging = true;

        XLSexport.Export(objWebviewer.Report.Document, memStream);
        memStream.Position = 0;
        Response.ContentType = "application/Xls";
        Response.AddHeader("content-disposition", "attachment; filename=" + ajDoc + ".Xls");

        Response.BinaryWrite(memStream.ToArray());
        Response.End();
        XLSexport = null;
    }

InformationsquelleAutor Ajay Patel

Vous devez vous connecter pour publier un commentaire.