VB.NETからのPDF帳票出力

VB.NET + Create!FormでのPDF帳票生成方法

まず、Create!Formを使ってPDF帳票を生成する手順を説明します。

1. 帳票開発環境で、帳票定義（デザインやデータとの関連付け）を作成する。
2. VB.NETアプリケーションより、帳票出力用データファイルを作成する。
3. VB.NETアプリケーションから、1の帳票定義や2の帳票出力用データファイルをもとに、Create!Form Cast(PDF帳票出力ランタイム)を呼びだし、PDF帳票を出力する。

3の、Create!Form Castを呼び出すVB.NETサンプルコードを以下に記載します。

VB.NETサンプルコード

VB.NETからの呼び出しが簡単に行える.NetAPIを使用してPDF帳票を作成します。

実行パラメーターに、作業ディレクトリ、スタイルファイル、出力ファイル名、入力データファイル名を設定し、Create!Form Castを呼び出します。

Imports Infotec.CreateForm.Runtime
Imports Infotec.CreateForm.Runtime.Pdf

Module Module1

    Sub Main()
        Dim cast As CastRuntime
        Dim param As RuntimeParam
        Dim inputStd As InputDataParamStandard
        Dim inputData() As InputDataParam
        Dim ret As Integer

        Console.WriteLine("## Create!Form Runtime Call. ##")

        ' ①実行オプションの設定
        param = New RuntimeParam
        param.WorkDir = "C:\ProgramData\Infotec\CreateForm\12\work\sample\01_申請・申込書"
        param.StyleFile = "A02_JukiCardShinsei.sty"
        param.OutputFile = param.WorkDir & "\A02_JukiCardShinsei.pdf"
        ' ②入力データファイルの設定
        inputStd = New InputDataParamStandard
        inputStd.DataFile = param.WorkDir & "\A02_JukiCardShinsei.csv"
        inputData = New InputDataParam() {inputStd}
        param.InputData = inputData
        ' ③ランタイムオブジェクトを作成し、のExecute メソッドを実行
        cast = New CastRuntime
        ret = cast.Execute(param)
        ' ④ランタイム実行の後処理
        If ret <> 1 Then
            ' エラー処理
            Console.WriteLine("Error Code:" + ret.ToString("D"))
        Else
            Console.WriteLine("Success")
        End If
    End Sub

End Module

このサンプルコードを実行すると、指定したディレクトリにPDF帳票「A02_JukiCardShinsei.pdf」が作成されます。

さらに以下の記事では、Create!Form体験版を利用する、より実践的なVB.NETサンプルコードを紹介しています。
Webクライアントのリクエストに応じてPDF帳票を生成し表示します。
ASP.NET（VB.NET）からの帳票出力

また、以下のような処理についても、この記事と同様の方法で実現できます。

帳票のオンデマンド印刷
セキュリティ付きPDF帳票の出力