Devuelve true si el puntero del archivo está situado inmediatamente después del marcador de fin de línea en un archivo TextStream; false en otro caso. Sólo lectura.
objeto.AtEndOfLine
objeto siempre es el nombre de un objeto del tipo TextStream.
La propiedad AtEndOfLine se aplica sólo a los archivos TextStream abiertos para lectura; de otra forma, se produce un error.
El código siguiente muestra el uso de la propiedad AtEndOfLine:
[JScript] function ObtenerUnaLinea(especificaciondearchivo) { var fso, a, s, ForReading; ForReading = 1, s = ""; fso = new ActiveXObject("Scripting.FileSystemObject"); a = fso.OpenTextFile(especificaciondearchivo, ForReading, false); while (!a.AtEndOfLine
) { s += a.Read(1); } a.Close( ); return(s); } [VBScript] Function LeerArchivoEntero(especificaciondearchivo) Const ComoLectura = 1 Dim fso, elArchivo, retstring Set fso = CreateObject("Scripting.FileSystemObject") Set elArchivo = fso.OpenTextFile(especificaciondearchivo, ComoLectura, False) Do While elArchivo.AtEndOfLine
<> True retstring = elArchivo.Read(1) Loop elArchivo.Close LeerArchivoEntero = retstring End Function
Se aplica a: Objeto TextStream
Ayuda de Javascript y Vbscript para Javascripts.astalaweb.com. |