Indice de contenido -> Capítulo 12 - Funciones para archivos

A continuación se describe el uso de las siguientes funciones predeterminadas en TEIMSI:

1)- binary_read(senda)

2)- binary_write(senda,cadena)

3)- closeh(manejador)

4)- deletefile(senda)

5)- fileexists(senda)

6)- filesize(senda)

7)- getatt(senda)

8)- openrand(senda)

9)- openread(senda)

10)- openwrite(senda)

11)- read(manejador,cantidad)

12)- seek(manejador,posición)

13)- setatt(senda,valor)

14)- seteof(manejador)

15)- write(manejador,cadena)

binary_read

La función "binary_read", lee todo el contenido de un archivo y lo carga en una variable tipo cadena de TEIMSI.

	var cadena=binary_read("archivo.txt")
	alert("Hay archivo ?, Respuesta = " + (cadena!=false))
	alert(cadena)

binary_write

La función "binary_write", escribe (sobre-escribe si ya existe) en un archivo todo el contenido de una variable tipo cadena.

	var nombre="archivo.txt"

	if(binary_write(nombre, "Raíz cuadrada de 77= "+sqrt(77))){
		openapp(nombre)
	}else{
		alert("Error "+err_number()+_nl+err_description(err_number()))
	}

closeh

La función "closeh", cierra un archivo cuyo manejador (número entero) fue devuelto por alguna de las siguientes funciones: openrand, openread, openwrite.

	var nombre="archivo.txt"
	var manejador=openwrite(nombre)
	if(manejador==false){
		alert("Error "+err_number()+_nl+err_description(err_number()))
		sys.quit()
	}
	write(manejador,"Dato.")
	closeh(manejador)

deletefile

La función "deletefile", borra un archivo en el sistema de archivos.

fileexists

La función "fileexists", determina si un archivo o directorio existe.

	alert(fileexists("c:\\ "))

filesize

La función "filesize", devuelve el tamaño de un archivo en una variable tipo entero o de precisión doble , o -1 si no existe. Si el tamaño excede 2147483647 bytes el valor devuelto es un número de precisión doble en lugar de un entero.

getatt

La función "getatt", carga los atributos de un archivo en un entero con ciertos bits activados según los mismos atributos (lectura, oculto, directorio, Etc.).

	var nombre="archivo.txt"

	var result=getatt(nombre)

	if(result===false){
		alert("Error "+err_number()+_nl+err_description(err_number()))
	}else{
		alert("El archivo " + nombre + ", tiene atributo de ser sólo de lectura = " + ((result & _att_readonly) != 0) );
	}

openrand

La función "openrand", abre un archivo para acceso aleatorio (escritura o lectura).

	var nombre="archivo.txt"
	var resultado1=binary_write(nombre, "abcdefghij")

	if(resultado1){
		var manejador=openrand(nombre)
	}
	if((resultado1==false) || (manejador==false)){
		alert("Error "+err_number()+_nl+err_description(err_number()))
		sys.quit()
	}
		seek(manejador,3)
		var letra=read(manejador,1)
		closeh(manejador)

	alert("letra leída = "+letra)		// Muestra la letra "d"

openread

La función "openread", abre un archivo para acceso de lectura.

openwrite

La función "openwrite", abre un archivo para acceso de escritura.

read

La función "read", lee datos desde un archivo cuyo manejador (número entero) fue devuelto por alguna de las siguientes funciones: "openrand" o "openread".

	(ver ejemplo de la función "openrand")

seek

La función "seek", mueve el puntero de lectura/escritura en un archivo cuyo manejador (número entero) fue devuelto por alguna de las siguientes funciones: openrand, openread, openwrite.

	(ver ejemplo de la función "openrand")

setatt

La función "setatt", establece los atributos de un archivo mediante un entero con ciertos bits activados según los mismos atributos (lectura, oculto, directorio, Etc.).

seteof

La función "seteof", establece el final del archivo en la posición actual del puntero de escritura de un archivo. Dicho puntero se actualiza automáticamente al escribir datos en un archivo o al cambiarlo explícitamente mediante una llamada a la función "seek".

write

La función "write", escribe datos en un archivo cuyo manejador (número entero) fue devuelto por alguna de las siguientes funciones: "openrand" o "openwrite".

	(ver ejemplo de la función "closeh")