eytp
25 de Agosto del 2002

Alguien sabe como cear y/o editar un archivo con VB sin emplear controles

webJose
25 de Agosto del 2002

Depende del tipo de archivo. Un archivo de texto se abre así:

Dim numArch as integer

numarch=Freefile
'Para lectura:
Open "C:test.txt" for input access read as #numArch
'Para escritura (borra información previa)
Open "C:test.txt" for output access write as #numarch
'Para escritura (anexar al final de archivo existente):
Open "C:test.txt" for append access write as #numarch

'Luego, para leer línea por línea:
dim linea as string

do while not(eof(numarch))
line input #numarch, linea
'Agregar la linea leida a un textbox multilinea, por ejemplo
text1.text=text1.text & vbcrlf & linea
loop

'Para escribir, por ejemplo el contenido de un textbox multilinea:
print #numarch, text1.text

'Debe cerrar el archivo cuando no lo use más.
close #numarch

Para otros tipos de archvo, el asunto es diferente. Por ejemplo, para leer archivos xls, debe abrir el archvo en forma binaria:

Open "C:test.xls" for Binary Access <Read/write> as #numArch

En el caso de Binary, puede omitir la parte Access... Luego, para interpretar el archivo xls, debe realizar rutinas específicas para la interpretación de bytes. Los archivos xls son en formato BIFF (Binary File Format). Puede encontrar información acerca de BIFF en la WWW.

Como puede ver, el tema es muy extenso y no puede cubrirse en un foro. Le recomiendo que consiga un libro al respecto.