Hola amigos espero tengan un buen dia, bueno aqui les muestro un codigo el cual mediante un dataset mando una imagen dinamica al reporte al crystal report, pero el problema es que no se como agregarle a este codigo una consulta SQL, alguien podria ayudarme a adaptarle a este codigo una consulta sql o como le puedo hacer para mostrar mi consulta. acontinuacion les muestro el codigo
Código:
Try
Dim FilStr As Stream
FilStr = System.IO.File.OpenRead(My.Application.Info.DirectoryPath & "\1.jpg")
'New FileStream(My.Application.Info.DirectoryPath & "\i.jpg")
Dim BinRed As New BinaryReader(FilStr)
Dim dr As DataRow = Me.DsImages.Tables("images").NewRow()
dr("path") = Me.OpenFileDialog2.FileName
dr("image") = BinRed.ReadBytes(CInt(BinRed.BaseStream.Length))
Me.DsImages.Tables("images").Rows.Add(dr)
FilStr.Close()
BinRed.Close()
Dim DyImg As New DynamicImageExample()
DyImg.SetDataSource(Me.DsImages)
Me.CrystalReportViewer2.Show()
Me.CrystalReportViewer2.ReportSource = DyImg
les agradezo de antemano la atencion prestada esperando y puedan ayudarme. muchas gracias y les envio un cordial saludo,