Juan
31 de Marzo del 2004

Necesito leer el contenido de un fichero, por ejemplo un pdf, en forma binaria. No se como hacerlo. Lo quiero guardar en una variable para despues poder leerla y a partir de ahi crear un copia de fichero ... ¿Como se hace esto?

Gracias

erika felix
31 de Marzo del 2004

Tengo un problema necesito la forma de guardar un archivo a campo binary, y convertir de ese campo binary al archivo que le correponde.

Te lo agradeceria mucho.-...

Juan
31 de Marzo del 2004

Antes que nada, para hacer una copia de un archivo
no necesitas abrirlo, ni mucho menos leerlo. Basta con
usar la instrucción:

FileCopy origen, destino

No obstante, para leer todo el contenido de un archivo
en forma binaria podrías hacer algo así:

Dim numArch As Integer, infoArch() As Byte
numArch = FreeFile
Open "ruta y nombre de archivo" For Binary As numArch
ReDim infoArch(LOF(numArch) - 1)
Get #numArch, , infoArch
Close #numArch

En este ejemplo el Array infoArch contiene todos los
bytes del archivo abierto.

juan
31 de Marzo del 2004

OKs, gracias.. el contenido del fichero en q variable se guarda exactamente. Mi problema es el siguiente. Necesito guardar un fichero pdf en un codigo de barras en formato PDF417, para q a la hora de leer el codigo de barras en 2d me lea el contenido del pdf en du formato original. No se si me explico bien. puedes enviarme un correo a la direccion: [email protected]

Juan
31 de Marzo del 2004

Pues despues de ejecutar las lineas que te he puesto
el contenido está almacenado en la variable infoArch
que es un array de typo Byte.

Sobre el formato PDF no tengo ni la menor idea.

juan
31 de Marzo del 2004

Si, era exactamente lo que quieria. Muchas graciass