[Resolvido] Inserir imagem externa dinamicamente no ReportViewer

[samesdavis 0]

Tenho uma base de dados onde eu guardo os dados do funcionários.

Criei um relatório que irá conter a foto desse funcionário que fica na mesma pasta da base de dados.

No arquivo rdlc, eu inseri um parâmetro do tipo texto e inseri um controle Imagem como EXTERNAL

e setado com o parâmetro que criei.

No form, tenho esse código

Dim rptDataSource As ReportDataSource = Nothing

Me.ReportViewer1.RefreshReport()
With Me.ReportViewer1.LocalReport
        Dim rptStream As IO.Stream = GetReport(strReport & ".rdlc")
        .LoadReportDefinition(rptStream)
        .EnableExternalImages = True
        ' Define os parameters 
        Dim parameters(0) As ReportParameter
        parameters(0) = New ReportParameter("pImage", strImagem)
        .SetParameters(parameters)
        .DataSources.Clear()
End With
Me.ReportViewer1.RefreshReport()
rptDataSource = New ReportDataSource("FichaRegistro", RsDataSet.Tables(0))

Só que não está carregando a imagem, alguém pode me ajudar ?

[samesdavis 0]

Problema resolvido

                       Dim rptStream As IO.Stream = GetReport(strReport & ".rdlc")
                       .EnableExternalImages = True
                       .LoadReportDefinition(rptStream)
                       If My.Computer.FileSystem.FileExists(strImagem) Then
                           strImagem = "file://" & strImagem
                       Else
                           strImagem = ""
                       End If
                       ' Define os parameters 
                       Dim parameters(0) As ReportParameter
                       parameters(0) = New ReportParameter("pImage", strImagem)
                       .SetParameters(parameters)
                       .DataSources.Clear()