VB-Report 10.0 for .NET - ASP.NET MVC デモ

ファイルパス指定

テンプレート(Excel で作成したデザインファイル)のファイルパスを指定して帳票を出力することができます。


サンプルコード

  • VB.NET
  • C#
  • Public Function CreateQuotation() As ReportData
        ' 帳票作成処理（デザインファイル使用）
        CellReport1.FileName = Path.Combine(basePath, "Quotation.xlsx")
        ' 帳票出力時にセルの計算式を再計算
        CellReport1.ApplyFormula = True
        CellReport1.Report.Start(ReportMode.Speed)
        CellReport1.Report.File()
        ' デザインファイル内の「見積書」シートを帳票レイアウトとして指定し、帳票ページを作成
        CellReport1.Page.Start("見積書", "1")
        CellReport1.Cell("A21").Value = "VB-Report 10"
        CellReport1.Cell("E21").Value = 5
        CellReport1.Cell("F21").Value = 85000
        CellReport1.Cell("A22").Value = "ExcelCreator 2016"
        CellReport1.Cell("E22").Value = 2
        CellReport1.Cell("F22").Value = 64000
        CellReport1.Cell("A23").Value = "ExcelWebForm"
        CellReport1.Cell("E23").Value = 1
        CellReport1.Cell("F23").Value = 70000
        CellReport1.Cell("A24").Value = "ExcelCreator for Java"
        CellReport1.Cell("E24").Value = 3
        CellReport1.Cell("F24").Value = 40000
        CellReport1.Cell("A25").Value = "Yubin7 for Java"
        CellReport1.Cell("E25").Value = 3
        CellReport1.Cell("F25").Value = 34000
        ' ページ終了処理
        CellReport1.Page.End()
        ' 帳票終了処理
        CellReport1.Report.End()
        ' 作成した帳票を SVG 形式で取得
        Dim document As String = CellReport1.Report.GetSvgReport(SvgSaveType.IncludeExcelPdf)

        Dim reportData As ReportData = New ReportData()
        reportData.Document = document
        Return reportData
    End Function
  • public ReportData CreateQuotation()
    {
        // 帳票作成処理（デザインファイル使用）
        cellReport1.FileName = Path.Combine(basePath, "Quotation.xlsx");
        // 帳票出力時にセルの計算式を再計算
        cellReport1.ApplyFormula = true;
        cellReport1.Report.Start(ReportMode.Speed);
        cellReport1.Report.File();
        // デザインファイル内の「見積書」シートを帳票レイアウトとして指定し、帳票ページを作成
        cellReport1.Page.Start("見積書", "1");
        cellReport1.Cell("A21").Value = "VB-Report 10";
        cellReport1.Cell("E21").Value = 5;
        cellReport1.Cell("F21").Value = 85000;
        cellReport1.Cell("A22").Value = "ExcelCreator 2016";
        cellReport1.Cell("E22").Value = 2;
        cellReport1.Cell("F22").Value = 64000;
        cellReport1.Cell("A23").Value = "ExcelWebForm";
        cellReport1.Cell("E23").Value = 1;
        cellReport1.Cell("F23").Value = 70000;
        cellReport1.Cell("A24").Value = "ExcelCreator for Java";
        cellReport1.Cell("E24").Value = 3;
        cellReport1.Cell("F24").Value = 40000;
        cellReport1.Cell("A25").Value = "Yubin7 for Java";
        cellReport1.Cell("E25").Value = 3;
        cellReport1.Cell("F25").Value = 34000;
        // ページ終了処理
        cellReport1.Page.End();
        // 帳票終了処理
        cellReport1.Report.End();
        // 作成した帳票を SVG 形式で取得
        string document = cellReport1.Report.GetSvgReport(SvgSaveType.IncludeExcelPdf);

        ReportData reportData = new ReportData();
        reportData.Document = document;
        return reportData;
    }