Thursday, June 9, 2011

วิธีส่งค่าตัวแปรจาก form ใน VB ไปยัง Crystal Report

 ในฟอร์ม

 Imports CrystalDecisions.Shared
pf1.Name = "DT1" 'ให้ตรงกับชื่อพารามิเตอร์ใน Crystal Report
pf2.Name = "DT2" 'ให้ตรงกับชื่อพารามิเตอร์ใน Crystal Report
pf3.Name = "sPlant" 'ให้ตรงกับชื่อพารามิเตอร์ใน Crystal Report
pdv1.Value = d1 'กำหนดค่าให้ตัวแปร pdv1
pdv2.Value = d2 'กำหนดค่าให้ตัวแปร pdv2
pdv3.Value = UcrlUnitTreeView1.SelectNodeText 'กำหนดค่าให้ตัวแปร pdv3
pf1.CurrentValues.Add(pdv1)
pf2.CurrentValues.Add(pdv2)
pf3.CurrentValues.Add(pdv3)
pfs.Add(pf1)
pfs.Add(pf2)
pfs.Add(pf3)
CrystalReportViewer1.ParameterFieldInfo = pfs
rpt.SetDataSource(dv)
CrystalReportViewer1.ReportSource = rpt
CrystalReportViewer1.Zoom(85)

 
 


Free TextEditor

No comments:

Post a Comment