VB (.NET Framework)からの帳票出力
VB (.NET Framework)からPDFに帳票出力する方法
.NETアプリケーションではCROWNIXの専用ビューア(OCX Viewer)をWindowsコントロールとして画面に組込むことが可能です。

1.デザイン
- 画面にコントロールを追加

2.コード
- ボタンクリック時の処理を追加

3.実行画面
- ボタンクリックでレポートを表示
サンプルコード
テンプレートパスを指定し、出力ファイル形式にPDFを設定することで、指定したパスにPDF形式でレポートを保存します。
Public Class Form1
Dim sApplyLicense = "http://localhost:8080/DataServer/service"
Dim sMRDPath = "http://localhost:8080/ReportingServer/mrd/sample.mrd"
Dim sMRDParam = "/rfn [http://localhost:8080/ReportingServer/mrd/sample.txt]"
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim bRtn As Boolean
Dim pRtn As Boolean
AxCxviewer70j1.ApplyLicense(sApplyLicense)
AxCxviewer70j1.AutoAdjust = False
AxCxviewer70j1.ZoomRatio = 100
Try
bRtn = AxCxviewer70j1.FileOpen(sMRDPath, sMRDParam)
If bRtn = False Then
MsgBox("ファイルオープンエラー")
Else
pRtn = AxCxviewer70j1.SaveAsPdfFile("C:\test\sample.pdf")
If pRtn = False Then
MsgBox("PDF保存エラー")
Else
MsgBox("保存されました。")
End If
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
End Class