[محاسب يوسف]

السلام عليكم
انا استخدم كريستال ريبورت
واطبع تقرير عن طريق datatble
السؤال
لدي الحقل
k24من نوع  System.Byte()

هل يمكن جلب صورة من كمبيوتر او قاعدة بيانات
ووضعها في k24
علما تعبئة datatable

كود :

       Dim dt As New DataTable
       With dt


           .Columns.Add("k2")
           .Columns.Add("k3")

           .Columns.Add("k4")
           .Columns.Add("k5")
           .Columns.Add("k6")

           .Columns.Add("k7")



           .Columns.Add("k8")
           .Columns.Add("k9")
           .Columns.Add("k10")
           .Columns.Add("k11")


           .Columns.Add("k14")
           .Columns.Add("k16")
           .Columns.Add("k17")
           .Columns.Add("k18")
           .Columns.Add("k19")
           .Columns.Add("k20")
           .Columns.Add("k21")
           .Columns.Add("k22")
           .Columns.Add("k23")


           .Columns.Add("k25")
           .Columns.Add("id")
           .Columns.Add("name")
           .Columns.Add("Expr1")
           .Columns.Add("k24")



       End With

       Try

     

       Catch ex As Exception
           MsgBox(ex.Message)
       End Try
       Dim date1 As String = DTP.Value.Date

       For I As Integer = 0 To dgv_bill.Rows.Count - 2

           'dt.Rows.Add(date1, TXT_iD.Text, K2.Text, K3.Text, K4.Text, k5.Text, txt_usere.Text)
           dt.Rows.Add(txt_rmz.Text, txt_name.Text, k1.Text, k3.Text, k7.Text, My.Settings.k1, My.Settings.k2, My.Settings.k3, My.Settings.k4, My.Settings.k5, dgv_bill.Rows(I).Cells(3).Value, dgv_bill.Rows(I).Cells(4).Value, dgv_bill.Rows(I).Cells(5).Value, dgv_bill.Rows(I).Cells(7).Value, dgv_bill.Rows(I).Cells(8).Value, dgv_bill.Rows(I).Cells(9).Value, dgv_bill.Rows(I).Cells(10).Value, dgv_bill.Rows(I).Cells(11).Value, date1, TextBox1.Text, TextBox2.Text, txt_valhsm.Text, TextBox4.Text)
       Next

       Dim rptDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
       rptDoc = New Crystalbill
       rptDoc.SetDataSource(dt)
       FRM_PRINT.CrystalReportViewer1.ReportSource = rptDoc
       FRM_PRINT.ShowDialog()

       FRM_PRINT.Dispose()