VBScript中怎样对文本文件里读写数据

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

对该文本文件多次写入数据时不影响之前写入的数据读数据是只读取文本中指定行的部分数据? 谢谢

解析:

用FileSystemObject对象创建一个TextStream便实现对文本文件的读写

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

创建指定文件并返回 TextStream 对象，该对象可用于读或写创建的文件。

语法

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

CreateTextFile 方法的语法有以下部分：

object 必选项。应为 FileSystemObject 或 Folder 对象的名称。

filename 必选项。字符串表达式，指明要创建的文件。

overwrite 可选项。Boolean 值指明是否可以覆盖现有文件。如果可覆盖文件，该值为 True；如果不能覆盖文件，则该值为 False 。如果省略该值，则不能覆盖现有文件。

unicode 可选项。Boolean 值指明是否以 Unicode 或 ASCII 文件格式创建文件。如果以 Unicode 文件格式创建文件，则该值为 True；如果以 ASCII 文件格式创建文件，则该值为 False。如果省略此部分，则假定创建 ASCII 文件。

说明

以下代码举例说明如何使用 CreateTextFile 方法创建并打开文本文件：

Sub CreateAfile

Dim fso, MyFile

Set fso = CreateObject("Scripting.FileSystemObject")

Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)

MyFile.WriteLine("这是一个测试。")

MyFile.Close

End Sub

对于 filename 已经存在的文件，如果 overwrite 参数为 False，或未提供此参数时，则会出现错误。

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

描述

打开指定的文件并返回一个 TextStream 对象，可以读取、写入此对象或将其追加到文件。

语法

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

OpenTextFile 方法的语法有以下部分：

object 必选项。应为 FileSystemObject 对象的名称。

filename 必选项。字符串表达式，指明要打开的文件名称。

iomode 可选项。输入/输出模式，是下列三个常数之一：ForReading，ForWriting,或 ForAppending。

create 可选项。Boolean 值，指出当指定的 filename 不存在时是否能够创建新文件。允许创建新文件时为 True，否则为 False。默认值为 False。

format 可选项。三个 Tristate 值之一，指出以何种格式打开文件。若忽略此参数，则文件以 ASCII 格式打开。

设置

iomode 参数可为下列设置之一：

ForReading 1 以只读模式打开文件。不能对此文件进行写 *** 作。

ForWriting 2 以只写方式打开文件。不能对此文件进行读 *** 作。

ForAppending 8 打开文件并在文件末尾进行写 *** 作。

format 参数可为下列设置之一：

TristateUseDefault -2 以系统默认格式打开文件。

TristateTrue -1 以 Unicode 格式打开文件。

TristateFalse 0 以 ASCII 格式打开文件。

说明

以下代码举例说明如何使用 OpenTextFile 方法打开写文件：

Sub OpenTextFileTest

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

Dim fso, f

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile("c:\testfile.txt", For Writing, True)

f.Write "嗨，你好！"

f.Close

End Sub

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

另TextStream还有如下方法:

Close 方法

Read 方法

ReadAll 方法

ReadLine 方法

Skip 方法

SkipLine 方法

Write 方法

WriteLine 方法

WriteBlankLines 方法

详细可参阅VBScript 5.0 帮助文档

VBS是基于VisualBasic的脚本语言。VBS的全称是MicrosoftVisualBasicScriptEdition，用记事本就可以看到源代码，在没有语法错误的前提下，直接双击左键就可以运行。

因为VBS较为简单可行性强，所以很多人都喜欢利用VBS去写病毒或者整人的代码，所以在打开VBS之前要确保VBS的安全性和渠道的可信性。任何一种文本编辑器都可以用来开发VBS，记事本是windows系统自带的，无需专门下载安装，更方便快捷。

VBS文件主要用于：

Windows系统管理员，自动化完成重复性的Windows *** 作系统任务。

仅适用于Internet Explorer的网页，用于执行HTML无法单独执行的某些功能。

微软IIS服务器，用于执行服务器端网页处理。

大多数情况下，已经不再使用VBS文件。在2019年8月，微软宣布将在Internet Explorer中默认禁用VBScript支持，这是唯一支持VBScript的浏览器。微软建议开发人员将任何使用VBScript的网页更新为使用JavaScript。

---