SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Kev en Martes 10 de Agosto de 2004, 16:06

Título: Archivos Binarios
Publicado por: Kev en Martes 10 de Agosto de 2004, 16:06
Hola foro, quisiera que me ayuden con el siguiente problema, uso archivos aleatorios para guardar datos de mi aplicacion, es decir, guardo varias variables, y matrices, tablas, etc. en este tipo de archivos tengo que definir la estructura e indicarle el tamaño, por esta razon defino matrices que pueden o no usar todo el espacio que les reserve, este es el principal motivo por el que quiero usar archivos binarios (estos no necesitas definir el tamaño, usan lo que necesitan), porque al usar alchivos aleatorios, el archivo que genero ocupa 700 Kb, un solo archivo  :huh:   :o  y lo que busco es que mis archivos generados sean transportables.

Ahora mi pregunta es: Como guardo las matrices y tablas de mi aplicacion usando archivos binarios????  :unsure:  :blink:

Alguien me puede ayudar con este problemilla?? o alguna sugerencia para optimizar (no desperdiciar espacio fisico...) mis archivos..

Gracias de antemano
 :comp:  :hola:
Título: Re: Archivos Binarios
Publicado por: DiabloRojo en Martes 10 de Agosto de 2004, 20:17
Que tal Kev?
Sobre el trabajo con archivos no se mucho en realidad. No sé si esto te ayude pero aquí te mando un link donde puedes encontrar  un tutorial donde, entre otras cosas, se trata el tema de los archivos (secuenciales, aleatorios y binarios):

http://www.telecable.es/personales/jrubi/i....htm?trucos.htm (http://www.telecable.es/personales/jrubi/index.htm?trucos.htm)

Revisa el capítulo 6.

Espero que te sea de alguna ayuda.

Suerte
Título: Re: Archivos Binarios
Publicado por: DiabloRojo en Martes 10 de Agosto de 2004, 20:30
Se me olvidó decirte que entraras al link "Curso"

Suerte
Título: Re: Archivos Binarios
Publicado por: Cyclop en Martes 10 de Agosto de 2004, 22:03
En un archivo binario, lo puedes hacer asi

Para grabar tu array

Código: Text
  1. dim sbuffer as string
  2. open "prueba.dat" for binary as #1
  3. sbuffer$ = join(miarray,",")
  4. put #1,0, sbuffer$
  5. close #1
  6.  
  7.  

y para leer

Código: Text
  1. open "prueba.dat" for binary as #1
  2. sbuffer$ = space(leof())
  3. get #1,0, sbuffer$
  4. close #1
  5. miarray = split(sbuffer$,",")
  6.  
  7.  

a ver si funka, sino ayudenme


jajajajaja


salu2


cyclop
Título: Re: Archivos Binarios
Publicado por: Cyclop en Martes 10 de Agosto de 2004, 22:14
aunque mejor seria que lo trabajes con OUTPUT e INPUT te va leyendo linea por lines y lo vas cargando a un array, lo mismo para grabar


salu2


cyclop