Pasar imagen de una página a un crystal report como parametro o como sea pero pasarla

[stuart_david3]

Tal vez no me explique bien, Me gustaría pasar una imagen de una página a un crystal report no la tengo en ninguna base de datos, ya que lo que he leído siempre lo hacen con un dataset, esto lo hago por que las imágenes que tengo en la página que tiene la imagen las mando de acuerdo al nombre de una persona (ese nombre si lo tengo en la base de datos), es por eso que la imagen de mi página varía de acuerdo al nombre que extraigo de mi base de datos, esto es lo que he estado haciendo.

A manera de ejemplo, quiero pasar por lo pronto una imagen que tenga en mi pagina al crystal report.

Esta es la imagen que mando:

Código vb:

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = Image1.ImageUrl
        Response.Redirect("Imagen.aspx?maimagen=" + TextBox1.Text)
    End Sub
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Image1.ImageUrl = ("~/cfe2.jpg")
    End Sub
 

Aquí recibo la URL y lo intento mandar a un parámetro, tengo otro parámetro pero con ese no hay problema solo recibe el contenido de un textbox:

Código vb:

Imports System.Drawing
Imports System.IO
Imports CrystalDecisions.Web
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Partial Class Imagen
    Inherits System.Web.UI.Page
    Public Function ImageToByte(ByVal pImagen As Image) As Byte()
        Dim mImage() As Byte
        Try
            If Not IsNothing(pImagen) Then
                Dim ms As New System.IO.MemoryStream
                pImagen.Save(ms, pImagen.RawFormat)
                mImage = ms.GetBuffer
                ms.Close()
                Return mImage
            End If
        Catch
        End Try
    End Function
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        TextBox1.Text = Request.QueryString("maimagen")
        Dim Imagen2 As String = TextBox1.Text
        Dim pathImage As String = Server.MapPath(Imagen2)
        Dim Imagen3 = ImageToByte(Image.FromFile(pathImage))
        If Not Page.PreviousPage Is Nothing Then
            Dim SourceTextBox As TextBox
            SourceTextBox = CType(PreviousPage.FindControl("TextBox1"),  _
                TextBox)
            If Not SourceTextBox Is Nothing Then
                TextBox1.Text = SourceTextBox.Text
            End If
 
 
        End If
 
        Dim rep As ReportDocument = New ReportDocument
        rep.Load(Server.MapPath("VerImagen.rpt"))
        Dim ParamAnio As ParameterDiscreteValue = New ParameterDiscreteValue
        ParamAnio.Value = TextBox1.Text
        Dim Imagen As ParameterDiscreteValue = New ParameterDiscreteValue
        Imagen.Value = Imagen3
        rep.ParameterFields(0).CurrentValues.Add(ParamAnio)
        rep.ParameterFields(1).CurrentValues.Add(Imagen)
        Me.CRVReemplazos.ReportSource = rep
        Me.CRVReemplazos.DataBind()
    End Sub
End Class
 

Pero pues me arroja este error:

Descripción: Excepción no controlada al ejecutar la solicitud Web actual. Revise el seguimiento de la pila para obtener más información acerca del error y dónde se originó en el código.

Detalles de la excepción: System.IO.FileNotFoundException: C:\Users\Deivid\Documents\Visual Studio 2010\WebSites\ImagenCrystal

Espero y me puedan ayuda, saludos!...