สร้าง Web Form ดังรูป ซึ่งประกอบด้วย Control ดังนี้ Textbox , Button และ Control ชื่อ CrystalReportViewer เพื่อใช้ในการโหลด Report เพื่อแสดงผลบน Web (asp.net)
กลับมาที่ Project ให้คลิกขวาที่ Project -> Add -> New Item เพื่อสร้างรายการใหม่
Protected Sub btnShowReport_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnShowReport.Click
Dim rpt As New ReportDocument()
rpt.Load(Server.MapPath("CrystalReport1.rpt"))
Me.CrystalReportViewer1.ReportSource = rpt
End Sub
Imports CrystalDecisions.CrystalReports.Engine
Partial Public Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
End Sub
Protected Sub btnShowReport_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnShowReport.Click
Dim rpt As New ReportDocument()
rpt.Load(Server.MapPath("CrystalReport1.rpt"))
rpt.SetParameterValue("CustomerID", Me.txtCustomerID.Text)
Me.CrystalReportViewer1.ReportSource = rpt
End Sub
End Class
Code C#
using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
using CrystalDecisions.CrystalReports.Engine;
public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, System.EventArgs e)
{
}
protected void btnShowReport_Click(object sender, EventArgs e)
{
ReportDocument rpt = new ReportDocument();
rpt.Load(Server.MapPath("CrystalReport1.rpt"));
rpt.SetParameterValue("CustomerID", this.txtCustomerID.Text);
this.CrystalReportViewer1.ReportSource = rpt;
}
}
หลังจากวาง Code เรียบร้อยแล้ว ลองกดที่ Run เพื่อดูผลลัพธ์ของ Report
ทดสอบการรัน Report ผ่านหน้า Web จะได้ผลเหมือนในรูป