Autor Tema: [APORTE] Cargar y Guardar imagenes en una Base Datos  (Leído 11583 veces)

0 Usuarios y 1 Visitante están viendo este tema.

E N T E R

  • Petabyte
  • ******
  • Mensajes: 1062
  • Reputación: +57/-13
  • www.enterpy.com
    • Ver Perfil
    • www.enterpy.com
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #15 en: Octubre 02, 2014, 12:07:47 pm »
Aca tenes el ejemplo con algunos retoques y con la función copiar archivo el destino tenes que modificar le a gusto.

SOURCE
https://www.mediafire.com/?uyn38qe36vj301q
CIBER GOOGLE - CONCEPCIÓN PARAGUAY
www.enterpy.com
Primera regla de la programacion, para que vas a hacerlo complicado si lo puedes hacer sencillo

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #16 en: Octubre 02, 2014, 12:42:31 pm »
Me falta un ocx capo




Sos un maestroooooooooooooooo !!!!!!!!!!!!1




E N T E R

  • Petabyte
  • ******
  • Mensajes: 1062
  • Reputación: +57/-13
  • www.enterpy.com
    • Ver Perfil
    • www.enterpy.com
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #17 en: Octubre 02, 2014, 12:59:05 pm »
No es un ocx es una version de MSCOMCTL.OCX que yo tengo no mas podes modificar el proyecto con extencion .vbp con el bloc de notas.
Reemplazando la entrada esta:

Código: (VB) [Seleccionar]
Form=MDIForm1.frm
Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.1#0; MSCOMCTL.OCX
Object={86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCT2.OCX


por esta

Código: (VB) [Seleccionar]
Form=MDIForm1.frm
Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCTL.OCX
Object={86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCT2.OCX

Pero te volvi a subir el proyecto

https://www.mediafire.com/?uyn38qe36vj301q
CIBER GOOGLE - CONCEPCIÓN PARAGUAY
www.enterpy.com
Primera regla de la programacion, para que vas a hacerlo complicado si lo puedes hacer sencillo

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #18 en: Octubre 03, 2014, 10:50:21 am »
lo pruebo y te cuento amigo


gracias

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #19 en: Octubre 03, 2014, 02:29:41 pm »
Me falta un ocx capo




Sos un maestroooooooooooooooo !!!!!!!!!!!!1





ME sigue dando elmismo error de no encontrada la ruta


E N T E R

  • Petabyte
  • ******
  • Mensajes: 1062
  • Reputación: +57/-13
  • www.enterpy.com
    • Ver Perfil
    • www.enterpy.com
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #20 en: Octubre 03, 2014, 03:42:12 pm »
Hace esto click derecho como te muestro mas abajo:

screen


http://snag.gy/qdWG4.jpg

Despues esto:

screen


http://snag.gy/RHsJp.jpg


Ahi donde te marque el el 2.1 cambia a 2.0 y guarda y volve a abrir con el VB6
CIBER GOOGLE - CONCEPCIÓN PARAGUAY
www.enterpy.com
Primera regla de la programacion, para que vas a hacerlo complicado si lo puedes hacer sencillo

YAcosta

  • Moderador Global
  • Exabyte
  • *****
  • Mensajes: 2853
  • Reputación: +160/-38
  • Daddy de Qüentas y QüeryFull
    • Ver Perfil
    • Personal
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #21 en: Octubre 03, 2014, 03:48:59 pm »
Doctor gasafonso, debes dar mas información, aparte de la imagen con el error publica también el código y señala en que linea te salta el error y asi tendrás tu respuesta mas rápido, debes también usar la ventana Inmediato para que veas el contenido de tus variables y detectes si estas manipulandolas correctamente.

He bajado el código de ENTER, el ultimo, y lo he probado tal cual a ver que sucede y efectivamente salta un error de ruta en esta linea:

Código: (VB) [Seleccionar]
Call FileCopy(ListView1.ListItems(i).SubItems(1), "D:\DESTINO\" & Extraer(ListView1.ListItems(i).SubItems(1), "\"))
Y eso es porque el amigo ENTER está usando una ruta absoluta y no relativa (ni disco D tengo en la virtual), simplemente debes de modificar esa linea de codigo y adaptarlo a tus necesidades. Por ejemplo, yo cambie la ruta destino para que se grabe en la misma carpeta del proyecto:

Código: (VB) [Seleccionar]
Call FileCopy(ListView1.ListItems(i).SubItems(1), App.Path & "\" & Extraer(ListView1.ListItems(i).SubItems(1), "\"))
Y funciona perfectamente doc.

Checa eso.

EDITO: Enter te respondio antes que yo por el tema de la version del MSCOMCTL... mmm, no creo que sea eso porque normalmente ese error salta ni bien se abre el proyecto pero bueno prueba.
« última modificación: Octubre 03, 2014, 03:51:31 pm por YAcosta »
Me encuentras en YAcosta.com

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
Re:[APORTE] Cargar y Guardar imagenes en una Base Datos
« Respuesta #22 en: Octubre 03, 2014, 04:39:50 pm »
Siii YAcosta graciasssssssssssssss


Era eso amigo


GRacias y saludos