imagen dinamica en crystal report sin usar dataset

[rishart]

Hola amigos buen dia, resulta que toy hacinedo un programa en el cual enlazo la informacion al crystal sin dataset el caso es que tengo un espacio para poner una imagen pero pongo una por default, la cuestion es que en mi sistema hay una seccion donde permite cambiar dicha imagen y pues el crystal aun tiene la imagen que le puse por default, mi pregunta es hay alguna manera de que pueda poner la imagen que el usuario seleccione para que lo muestre en el crystal report. el crystal report lo enlazo directamente a la base de datos que es access 2003.

acontinuacion les muestro el codigo para hacer la consulta y me lo muestre en el reporte de crystal reprot.

Código:

Dim sql As String


        cn = CreateObject("ADODB.Connection")
        rs = CreateObject("ADODB.Recordset")

        rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        ' abre la base de datos
        cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data " & "Source=" & My.Application.Info.DirectoryPath & "\inventario.mdb;Persist Security Info=False")


        sql = "SELECT * FROM clientes where sexo='Masculino'"


        rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly)

        If rs.RecordCount = 0 Then
            MsgBox("No hay registros", MsgBoxStyle.Exclamation, "Inventarios")
        Else
            Form28.CrystalReportViewer2.Visible = True
            Dim miInforme As New clientes
            miInforme.SetDataSource(rs)
            Form28.CrystalReportViewer2.ReportSource = miInforme
            Form28.Show()

        End If

ese el el codigo donde hago la consulta y muestro el reporte. alguien podria ayudarme para ponerle la imagen que el usuario seleccione. es decir que permita estar cambiando las imagenes para mostrarlos en el reporte del crystal report..

les agradezco de antemano la atencion prestada y les envio un cordial saludo esperando puedan ayuadarme ya que llevo un buen rato tratando de solucionar el problema pero no he podido. muchas gracias...

[rishart]

Iniciado por rishart

Hola amigos buen dia, resulta que toy hacinedo un programa en el cual enlazo la informacion al crystal sin dataset el caso es que tengo un espacio para poner una imagen pero pongo una por default, la cuestion es que en mi sistema hay una seccion donde permite cambiar dicha imagen y pues el crystal aun tiene la imagen que le puse por default, mi pregunta es hay alguna manera de que pueda poner la imagen que el usuario seleccione para que lo muestre en el crystal report. el crystal report lo enlazo directamente a la base de datos que es access 2003.

acontinuacion les muestro el codigo para hacer la consulta y me lo muestre en el reporte de crystal reprot.

Código:

Dim sql As String


        cn = CreateObject("ADODB.Connection")
        rs = CreateObject("ADODB.Recordset")

        rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient
        ' abre la base de datos
        cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data " & "Source=" & My.Application.Info.DirectoryPath & "\inventario.mdb;Persist Security Info=False")


        sql = "SELECT * FROM clientes where sexo='Masculino'"


        rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly)

        If rs.RecordCount = 0 Then
            MsgBox("No hay registros", MsgBoxStyle.Exclamation, "Inventarios")
        Else
            Form28.CrystalReportViewer2.Visible = True
            Dim miInforme As New clientes
            miInforme.SetDataSource(rs)
            Form28.CrystalReportViewer2.ReportSource = miInforme
            Form28.Show()

        End If

ese el el codigo donde hago la consulta y muestro el reporte. alguien podria ayudarme para ponerle la imagen que el usuario seleccione. es decir que permita estar cambiando las imagenes para mostrarlos en el reporte del crystal report..

les agradezco de antemano la atencion prestada y les envio un cordial saludo esperando puedan ayuadarme ya que llevo un buen rato tratando de solucionar el problema pero no he podido. muchas gracias...

disculpen la incistencia, pero en verdad necesito tener nociones sobre como le puedo hacer me podrian day una ayudadita u orientarme sobre como le puedo hacer. nuevamente les agradezco de antemano y les envio un cordial saludo