OpenTextFile es un método en el lenguaje asp. Abre el archivo especificado y devuelve un objeto TextStream. El archivo se puede leer, escribir o agregar a través de este objeto.
OpenTextFile es un método en lenguaje asp.
Abre el archivo especificado y devuelve un objeto TextStream a través del cual el archivo se puede leer, escribir o agregar.
objeto.OpenTextFile(nombre de archivo[, iomode[, crear[, formato]]])
1. El editor de métodos abre el archivo especificado y devuelve un objeto TextStream, a través del cual el archivo se puede leer, escribir o agregar.
objeto.OpenTextFile(nombre de archivo[, iomode[, crear[, formato]]])
2. Objeto de edición de parámetros
Requerido. El objeto debe ser el nombre de un FileSystemObject.
Nombre del archivo
Requerido. Una expresión de cadena que especifica el archivo que se va a abrir.
modo iomodo
Opcional. Puede ser una de tres constantes: ForReading, ForWriting o ForAppending.
crear
Opcional. Valor booleano que indica si se debe crear un archivo nuevo cuando el nombre de archivo especificado no existe. El valor es Verdadero si se crea un nuevo archivo y Falso si no se crea. Si se omite, no se crea ningún archivo nuevo.
formato
Opcional. Utilice uno de los valores de tres estados para especificar el formato en el que abrir el archivo. Si se omite, el archivo se abrirá en formato ASCII.
3. Configure y edite el parámetro iomode, que puede ser cualquiera de las siguientes configuraciones:
Descripción del valor constante
ForReading 1 abre el archivo de solo lectura. Este archivo no se puede escribir.
ForWriting 2 Abrir archivo para escribir
ForAppending 8 abre el archivo y comienza a escribir desde el final del archivo.
El parámetro de formato puede ser cualquiera de las siguientes configuraciones:
descripción del valor
TristateTrue abre archivos en formato Unicode.
TristateFalse abre el archivo en formato ASCII.
TristateUseDefault Abre el archivo usando los valores predeterminados del sistema.
4. Instrucciones Editar El siguiente código ilustra cómo utilizar el método OpenTextFile para abrir un archivo y agregar texto:
var fs, a, para agregar;
Para agregar = 8;
fs = nuevo ActiveXObject(Scripting.FileSystemObject);
//Puede ser una de tres constantes: ForReading, ForWriting o ForAppending
//Son 1, 2, 8 respectivamente
a = fs.OpenTextFile(c://testfile.txt, 2, falso);
...
a.Cerrar();
Casos de uso en script vbs
Abre el archivo especificado y devuelve un objeto TextStream que se puede leer, escribir o agregar al archivo.
objeto.OpenTextFile(nombre de archivo[,iomodo[,crear[,formato]]])
parámetro
objeto
Requerido. Debe ser el nombre de un objeto FileSystemObject.
Nombre del archivo
Requerido. Una expresión de cadena que especifica el nombre del archivo que se va a abrir.
modo iomodo
Opcional. Modo de entrada/salida, una de las siguientes tres constantes: ForReading, ForWriting o ForAppending.
crear
Opcional. Valor booleano que indica si se puede crear un nuevo archivo cuando el nombre de archivo especificado no existe. True para permitir la creación de nuevos archivos; False en caso contrario. El valor predeterminado es Falso.
formato
Opcional. Uno de los tres valores Tristate que indican el formato en el que abrir el archivo. Si se omite este parámetro, el archivo se abre en formato ASCII.
El parámetro iomode puede tener una de las siguientes configuraciones:
| constante | valor | describir |
| Para leer | 1 | Abra el archivo en modo de solo lectura. Este archivo no se puede escribir. |
| Para escribir | 2 | Abra el archivo solo para escribir. Este archivo no se puede leer. |
| Para anexar | 8 | Abra el archivo y escriba al final del archivo. |
El parámetro de formato puede ser una de las siguientes configuraciones:
| constante | valor | describir |
| Uso TristateDefault | -2 | Abra el archivo en el formato predeterminado del sistema. |
| TriestadoVerdadero | -1 | Abra el archivo en formato Unicode. |
| TriestadoFalso | 0 | Abra el archivo en formato ASCII. |
Ejemplos de uso:
- Prueba de archivo de subtexto abierto
- ConstForReading=1,ForWriting=2,ForAppending=8
- Dimfso,f
- Setfso=CrearObjeto(Scripting.FileSystemObject)
- Setf=fso.OpenTextFile(c:/testfile.txt,ForWriting,True)
- f.Escribe ¡Hola!
- f.Cerrar
- FinSub
- Llamar a OpenTextFileTest
Una función escrita por Wulin.com
- Dimso
- Setfso=CrearObjeto(Scripting.FileSystemObject)
- setfn2=fso.GetFile(E:/webroot/vevb/index2.htm)
- flsize2=fn2.tamaño
- fldate2=fn2.fechaúltimamodificación
- setfn=fso.GetFile(E:/webroot/vevb/index.htm)
- flsize1=fn.tamaño
- fldate1=fn.fechaúltimamodificación
- Iffso.FileExists(E:/webroot/vevb/index2.htm)andflsize2>50000andfldate2>fldate1Entonces
- 'Determine el tamaño del archivo. Si el archivo html se regenera, debe determinar si se ha actualizado y el archivo no puede tener menos de 50 K.
- fso.getfile(E:/webroot/vevb/index2.htm).copiar(E:/webroot/vevb/index.htm)
- iferr.number=0entoncesWriteHistory exitoso&ahora()&..........,log.txt
- endif
- 'Función de escritura de registros
- SubWriteHistory(susCaracteres,ruta)
- ConstForReading=1,ForAppending=8
- Dimfso,f
- Setfso=CrearObjeto(Scripting.FileSystemObject)
- Setf=fso.OpenTextFile(ruta,ParaAgregar,Verdadero)
- f.WriteLinehisChars
- f.Cerrar
- FinSub