Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: wolf_kof en Julio 09, 2010, 01:54:44 am
-
(http://img62.imageshack.us/img62/3781/softq.png)
Bueno como podrán apreciar en la imagen, mi soft tiene ese reporte que esta hecho en datareport, la dificultad es que mi cliente quiere que en ese reporte donde esta la biñeta de color azul, quiere la foto del producto. pero esa sección es detalle, como hago para poder poner la foto en detalle del listado de productos?
este es el codigo que utilizo para crear el reporte
Dim com, linea1, linea2, linea3, linea4
com = compania.Fields("IMAGEN")
linea1 = compania.Fields("NOMBRE")
linea2 = compania.Fields("DIRECCION")
linea3 = compania.Fields("REGION")
linea4 = "Teléfonos: " & compania.Fields("TELEFONOS")
If DataSoftCorp.rsProductos.State = adStateOpen Then
DataSoftCorp.rsProductos.Close
Set rptcatalogoproductos.Sections("Sección4").Controls.Item("fotoempresa").Picture = LoadPicture(conexion & "\img" & com)
rptcatalogoproductos.Sections("Sección4").Controls.Item("empresa").Caption = linea1
rptcatalogoproductos.Sections("Sección4").Controls.Item("linea1").Caption = linea2
rptcatalogoproductos.Sections("Sección4").Controls.Item("linea2").Caption = linea3
rptcatalogoproductos.Sections("Sección4").Controls.Item("linea3").Caption = linea4
rptcatalogoproductos.Show
Else
Set rptcatalogoproductos.Sections("Sección4").Controls.Item("fotoempresa").Picture = LoadPicture(conexion & "\img" & com)
rptcatalogoproductos.Sections("Sección4").Controls.Item("empresa").Caption = linea1
rptcatalogoproductos.Sections("Sección4").Controls.Item("linea1").Caption = linea2
rptcatalogoproductos.Sections("Sección4").Controls.Item("linea2").Caption = linea3
rptcatalogoproductos.Sections("Sección4").Controls.Item("linea3").Caption = linea4
rptcatalogoproductos.Show
End If
-
jaja asu que bonito diseño :) "Adminsitracion" :)
ESO ES UN TOOLBAR? tendras ahi ese control encontre la pagina pero ya no sirve
te dejo mi msn k_arlytos@hotmail.com
saludos
-
Wolf, no soy muy dado con los reportes en DataReport, pero encontre un ejemplo que quizas podría ayudarte en tu proyecto para futuros reportes.
Por otro lado subo un proyecto que fue creado por Leandro y Luciano que podrias usar perfectamente bien, tal cual como deseas listando los productos con su foto. Saludos
DataReport Etiquetas.rar (http://www.4shared.com/file/voPkzgFH/DataReport_Etiquetas.html)
Dibujar Text con Formato.rar (http://www.4shared.com/file/eLs2oaQ-/Dibujar_Text_con_Formato.html)
Saludos ;D
-
jaja asu que bonito diseño :) "Adminsitracion" :)
ESO ES UN TOOLBAR? tendras ahi ese control encontre la pagina pero ya no sirve
te dejo mi msn k_arlytos@hotmail.com
saludos
Ese control es del Codejock, creo que wolf_kof por alli lo posteo.
Salu2.
-
Esta si creo que es una limitación del DataReport. Es decir, no podemos hacer Catalogo de Productos con Fotos, al menos yo no lo he logrado aun. Si es crucial este tema para tu proyecto caballero no mas, tienes que irte por Cristal Report.
Con el DataReport el problema no es como poner la foto, el problema esta en como acceder al Detalle, si lográramos acceder al detalle poner la foto por cada producto es muy sencillo, pero esto se complica porque el rs llena en UNA el detalle sin que podamos acceder a el.
Yo estuve ensayando con ciclos for next, pero basta con que hagamos:
Set .Controls("ImFoto").Picture = LoadPicture(RutaDeTuFoto(Variable))
Le clava la misma foto a todo el detalle.
El control Image del DR tampoco admite un DataField.
-
Tienes toda la razon es un problema, pero yo no tengo ningún conocimiento de como crear reportes en Crystal Report, no se que versión ocupar, como enlazarlo a a Visual Basic? como ver los reprotes, como filtrar?
En los ejemplos de SSCCAANN 8) solo esta como ver una foto dinamica con el datareport, eso creo que ya lo tenia resuelto, es problema es como dice YvanB hay que acceder al detalle y a cada registro para poder poner la foto de cada registro.
Ho gran SSCCAANN le pido ayuda para poder iniciarme en Crystal Report. :) :) :) :)
-
Si alguien mas tambien quiere ayudar, bien benido sea. Acepto Cualquier ayuda para esto.
-
Alli coloque otro reporte que es un control de usuario que puedes usar para ello...! Donde puedes tomar la imagen del producto y mostrarla...
Dibujar Text con Formato.rar (http://www.4shared.com/file/eLs2oaQ-/Dibujar_Text_con_Formato.html)
Respecto al Crystal Report, podría enviarte algunos ejemplos...! Pero debes instalar el Skype para conversar y asi ayudarte con el TeamViewer y Guiarte por la llamada..! De esa manera ayude a SKL y ahora es un GROSO con el Crystal... Jajaja ::)
Bueno, saludos a todos...!
-
Alli coloque otro reporte que es un control de usuario que puedes usar para ello...! Donde puedes tomar la imagen del producto y mostrarla...
Dibujar Text con Formato.rar (http://www.4shared.com/file/eLs2oaQ-/Dibujar_Text_con_Formato.html)
Respecto al Crystal Report, podría enviarte algunos ejemplos...! Pero debes instalar el Skype para conversar y asi ayudarte con el TeamViewer y Guiarte por la llamada..! De esa manera ayude a SKL y ahora es un GROSO con el Crystal... Jajaja ::)
Bueno, saludos a todos...!
Doctor, lo que quiere wolf (y yo jeje) es que si es posible hacerlo en el DataReport y el ejemplo es sobre el objeto printer... que de todas maneras esta bien chevere y lo voy a usar para sacarme del apuro del Catalogo de Productos.
En todo caso a mi también me interesa apuntarme al curso de CristalReport ya que no soy nada ducho en ello ... pago con especias... jeje... me avisas por tus tiempos.
Saludos
-
Ahora mismo estoy bajando el Skipe, y vamos a ver si hoy en la tarde te contacto para poder hacer el tuto, grax por tu ayuda SSCCAANN siempre todo un groso, y si el ejemplo es con el objeto printer, cosa que tampoco domino jejee ???
-
Ok, Avisan entonces para la FIRST Class...! ::D
-
Como le hacemos para coordinar la hora? en todo caso voy a estar en el mesenger.
-
Escucho sugerencias...! Pero deben tener el TeamViewer y Skype..!