//.aspxのコード Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 'キャッシュを無効にする Response.Cache.SetCacheability(HttpCacheability.NoCache) 'レポートの表示 Call subPrint(); End Sub
Protected Sub subPrint() 'レポートクラス Dim rpt as new ActiveReportClass 'レポートの実行 rpt.Run(False) 'WebViewerに設定 Me.WebViewer1.ClearCachedReport() Me.WebViewer1.ViewerType = DataDynamics.ActiveReports.Web.ViewerType.ActiveXViewer Me.WebViewer1.Report = rpt Me.WebViewer1.Visible = True End Sub