VB-reportをサンプル通りにコーディングすると、
report.FileName = "sample.xls"
report.Report.Start("mydoc")
report.Report.File()
report.Page.Start("mysheet", "1")
' 帳票作成
report.Page.End()
report.Report.End()
ところが下記でエラー発生、
for i as integer =1 to 2
report.FileName = "sample.xls"
report.Report.Start("mydoc")
report.Report.File()
report.Page.Start("mysheet", "1")
' 帳票作成
report.Page.End()
report.Report.End()
next
ようするに2回目以降がエラーとなる。
エラー内容からファイルがオープンできないらしい。
試行錯誤の上、下記で解決。
for i as integer =1 to 2
Dim docname As String = "Doc" & Str(DateTime.Now.Ticks)
report.FileName = "sample.xls"
report.Report.Start(docname)
report.Report.File()
report.Page.Start("mysheet", "1")
' 帳票作成
report.Page.End()
report.Report.End()
next
ようするにドキュメント名を重複しないようにした。