He estado buscando una manera de extraer imágenes de formularios de acceso. Una búsqueda en Google casi siempre apunta aOLEtoDisk. Este software permite exportar imágenes almacenadas en campos OLE dentro de las tablas de acceso. Esto no es lo que quiero.

Tengo un formulario con algunos logos, encabezados e imágenes de fondo. Esas imágenes hacen que la base de datos sea cada vez más grande (porque están incrustadas en el formulario). Los extraería, los colocaría en nuestro servidor junto con el archivo de back-end y los agregaría a mis formularios, pero esta vez como imágenes vinculadas en lugar de imágenes incrustadas.

Espero que me esté dejando claro. Cualquier sugerencia es bienvenida.

EDITAR: Agregué el código que estoy usando para exportar PictureData de un control de imagen como un archivo de imagen. Este código no funciona según lo previsto. Descubrí que PictureData es una matriz de bytes, pero después de copiarlo en un archivo, obtengo un carácter NUL cada dos caracteres.

Public Function savePict(pImage As Access.Image)
    Dim fname As String 'The name of the file to save the picture to
    Dim iFileNum As Double

    fname = Environ("Temp") + "\temp.png" ' Destination file path
    iFileNum = FreeFile 'The next free file from the file system

    Open fname For Binary Access Write As iFileNum
        Dim tbyte As Variant
        Dim i As Double
        'Write the byte array to the file
        For i = 0 To Len(pImage.PictureData)
            Put #iFileNum, , pImage.PictureData(i)
        Next i
    Close #iFileNum
End Function