Red de conocimiento informático - Problemas con los teléfonos móviles - Cómo leer y escribir datos de archivos de texto en VBScript

Cómo leer y escribir datos de archivos de texto en VBScript

Categoría: Computadora/Red >> Programación >> Otros lenguajes de programación

Descripción del problema:

Escribir datos en este archivo de texto varias veces no tiene ningún efecto Los datos escritos antes; leer datos significa leer solo parte de los datos de la línea especificada en el texto. Gracias

Análisis:

¿Utilizar el objeto FileSystemObject para crear un TextStream para leer? el archivo de texto Escribir

--------------------------------------- ------ ---------

Crea el archivo especificado y devuelve un objeto TextStream, que puede usarse para leer o escribir el archivo creado.

Sintaxis

object.CreateTextFile(filename[, overwrite[, unicode]])

La sintaxis del método CreateTextFile tiene las siguientes partes:

objeto requerido. Se espera que sea el nombre de un objeto FileSystemObject o Folder.

el nombre del archivo es obligatorio. Una expresión de cadena que especifica el archivo que se va a crear.

sobrescribir opcional. Valor booleano que indica si los archivos existentes se pueden sobrescribir. El valor es Verdadero si el archivo se puede sobrescribir; Falso si el archivo no se puede sobrescribir. Si se omite este valor, los archivos existentes no se pueden sobrescribir.

unicode opcional. Un valor booleano que indica si el archivo se crea en formato de archivo Unicode o ASCII. Este valor es Verdadero si el archivo se crea en formato de archivo Unicode; Falso si el archivo se crea en formato de archivo ASCII. Si se omite esta sección, se supone que se crea un archivo ASCII.

Descripción

El siguiente código ilustra cómo utilizar el método CreateTextFile para crear y abrir un archivo de texto:

Sub CreateAfile

Dim fso, MiArchivo

Establecer fso = CreateObject("Scripting.FileSystemObject")

Establecer MiArchivo = fso.CreateTextFile("c:\testfile.txt", True)

MyFile .WriteLine("Esto es una prueba.")

MyFile.Close

End Sub

Para un archivo cuyo nombre de archivo ya existe, si el parámetro de sobrescritura es falso o, si no se proporciona este parámetro, se producirá un error.

------------------------------------------------- ---- ----------------

Descripción

Abre el archivo especificado y devuelve un objeto TextStream, que se puede leer. escrito o adjuntarlo al archivo.

Sintaxis

object.OpenTextFile(filename[, iomode[, create[, format]]])

La sintaxis del método OpenTextFile tiene las siguientes partes :

p>

objeto requerido. Se espera que sea el nombre de un objeto FileSystemObject.

el nombre del archivo es obligatorio. Una expresión de cadena que especifica el nombre del archivo que se va a abrir.

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.

Configuración

El parámetro iomode puede ser una de las siguientes configuraciones:

ForReading 1 abre el archivo en modo de solo lectura. No se puede escribir en este archivo.

Para escribir 2 Abra el archivo para escribir únicamente. Este archivo no se puede leer.

ForAppending 8 abre el archivo y escribe al final del mismo.

El parámetro de formato puede ser una de las siguientes configuraciones:

TristateUseDefault -2 abre el archivo en el formato predeterminado del sistema.

TristateTrue -1 abre el archivo en formato Unicode.

TristateFalse 0 Abre el archivo en formato ASCII.

Descripción

El siguiente código ilustra cómo utilizar el método OpenTextFile para abrir y escribir un archivo:

Sub OpenTextFileTest

Const ForReading = 1, ForWriting = 2, ForAppending = 8

Dim fso, f

Establecer fso = CreateObject("Scripting.FileSystemObject")

Establecer f = fso .OpenTextFile("c :\testfile.txt", Para escribir, Verdadero)

f.Write "¡Hola, hola!"

f.Close

Fin Sub

p>

--------------------------------------- ------ ----------------

Además, TextStream también tiene los siguientes métodos:

Método de cierre

Método de lectura

p>

Método ReadAll

Método ReadLine

Método Skip

Método SkipLine

Método de escritura

Método WriteLine

Método WriteBlankLines

Para obtener más información, consulte el documento de ayuda de VBScript 5.0