Pass value to Crystal Report

ปรับปรุง : 2550-12-04 (รวบรวม)

- http://msdn2.microsoft.com/en-us/library/aa289936(VS.71).aspx
- Add Item โดยเลือก Crystal Report ใน Windows Application
- เลือก As a Blank Report
- ใน Field Explorer เลือก Right Click บน Parameter Fields + New
- ช่อง Name กรอกว่า groupofmyvar + ok
- แล้วลาก groupofmyvar จาก Field Explorer ไปวางใน Section1 (Report Header)
- กลับเข้า form1
- สร้าง CrystalReportViewer1 ใน form1
- สร้าง button1 และใส่ code ข้างล่างนี้ในปุ่ม เพื่อเรียกรายงานมาแสดง
        CrystalReportViewer1.ReportSource = "C:\CrystalReport1.rpt"
        CrystalReportViewer1.Refresh()
- ถ้าส่งตัวแปรเดียวก็ใช้ code ด้านล่างนี้
        Dim paramFields As New ParameterFields()
        Dim paramField As New ParameterField()
        Dim discreteVal As New ParameterDiscreteValue()
        paramField.ParameterFieldName = "groupofmyvar"
        discreteVal.Value = 5
        paramField.CurrentValues.Add(discreteVal)
        paramFields.Add(paramField)
        CrystalReportViewer1.ParameterFieldInfo = paramFields
- ถ้าเพิ่มตัวแปรใน CrystalReport ก็ต้องเพิ่ม code ให้กับปุ่ม
        Dim paramFields As New ParameterFields()
        Dim paramField As New ParameterField()
        Dim discreteVal As New ParameterDiscreteValue()
        '
        paramField.ParameterFieldName = "groupofmyvar"
        discreteVal.Value = "burin rujjanapan"
        paramField.CurrentValues.Add(discreteVal)
        paramFields.Add(paramField)
        '
        discreteVal = New ParameterDiscreteValue()
        paramField = New ParameterField()
        '
        paramField.ParameterFieldName = "oid"
        discreteVal.Value = "10248"
        paramField.CurrentValues.Add(discreteVal)
        paramFields.Add(paramField)
        '
        CrystalReportViewer1.ParameterFieldInfo = paramFields
        CrystalReportViewer1.ReportSource = "C:\CrystalReport1.rpt"
        CrystalReportViewer1.Refresh()
- สร้าง Command ใน Database Export ของ Crystal Report
และพิมพ์ว่า select * from [order details] where orderid={?oid} และเพิ่ม parameterlist ชื่อ oid เข้าไป


แนะนำเว็บใหม่ : ผลการจัดอันดับ
รักลำปาง : thcity.com : korattown.com : topsiam.com : มหาวิทยาลัยโยนก
ศูนย์สอบ : รวมบทความ : ไอทีในชีวิตประจำวัน : ดาวน์โหลด : yourname@thaiall.com
ติดต่อ ทีมงาน ชาวลำปาง มีฝันเพื่อการศึกษา Tel.08-1992-7223