SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: pacegar en Martes 8 de Marzo de 2005, 15:00

Título: Guardar Imagen En Mysql
Publicado por: pacegar en Martes 8 de Marzo de 2005, 15:00
Hola tengo este procedimiento para guardar imagenes en la tabla. Sobre Microsoft SQL Server no tengo problemas, pero sobre MySQL si, supongo que es por el tipo del campo definido que esta como Char 1 binary
Alguna sugerencia?

Public Sub GuardarAdjunto(campoBinary As Field, ruta As String)
    'Guardar el contenido del Picture en el campo de la base
    Dim i As Integer
    Dim Fragment As Integer, Fl As Long, Chunks As Integer
   
    'Leer el fichero y guardarlo en el campo
    DataFile = FreeFile
    Open ruta For Binary Access Read As DataFile
    Fl = LOF(DataFile)    ' Longitud de los datos en el archivo
    If Fl = 0 Then Close DataFile: Exit Sub
   
    Chunks = Fl \ conChunkSize
    Fragment = Fl Mod conChunkSize
    ReDim Chunk(Fragment)
   
    Get DataFile, , Chunk()
    campoBinary.AppendChunk Chunk()
    ReDim Chunk(conChunkSize)
    For i = 1 To Chunks
        Get DataFile, , Chunk()
        campoBinary.AppendChunk Chunk()
    Next i
    Close DataFile
End Sub
Título: Re: Guardar Imagen En Mysql
Publicado por: fuhrer en Martes 8 de Marzo de 2005, 18:00
Hola.

Por lo que yo se, en Mysql no se pueden guardar imaganes, asi que supongo que eso que haces te marca error al momento en que intentas guardar una. Lo que yo te recomiendo que puedes hacer y que yo he hecho, es que guardes en la base de datos la ruta donde se encuentra tu imagen y cuando la vayas a usar, consultas esa ruta y de ahi muestras la imagen.

Espero te sirva.

Hasta luego.
Título: Re: Guardar Imagen En Mysql
Publicado por: pacegar en Miércoles 9 de Marzo de 2005, 16:00
Ya lo he conseguido, se ha de definir el tipo de campo como BLOB