[Rabeea Qbaha]

تابع الفيديو صديقي:




وهذا كود الاخ ابراهيم ولكن بلغة vb 

PHP كود :

Dim cryRpt As ReportDocument = New ReportDocument
    cryRpt.Load(Application.StartupPath & "\MyReport.rpt")
    Dim txt1 As TextObject = CType(cryRpt.ReportDefinition.Sections("Section1").ReportObjects("TextObject1"), TextObject)
    Dim txt2 As TextObject = CType(cryRpt.ReportDefinition.Sections("Section1").ReportObjects("TextObject2"), TextObject)
    txt1.Text = textbox1.Text
    txt2.Text = textbox2.Text
    Dim frm As Form = New Form
    frm.Height = 800
    frm.Width = 600
    Dim crystalReportViewer1 As CrystalDecisions.Windows.Forms.CrystalReportViewer = New CrystalDecisions.Windows.Forms.CrystalReportViewer
    crystalReportViewer1.Dock = System.Windows.Forms.DockStyle.Fill
    crystalReportViewer1.ReportSource = cryRpt
    crystalReportViewer1.Refresh
    frm.Controls.Add(crystalReportViewer1)
    frm.ShowDialog