vbs如何写进度条_VBS文本文件操作实现代码

对于文件的操作，例如：生成一个或者打开一个或者删除一个.txt格式文件。

虽然官方的FILE插件提供了一些基本功能，但功能不多。

你并不需要理解什么是fso模版，什么是vbs语句，直接套用下面的语句吧！

红色字为自己定义的部分，蓝色字为任意选一部分

如果你看不懂，请参考下面的例子！

操作同一个文件红色部分必须相同

请认真看括号内的解释内容

定义一个名为fso的关系文件问题的对象，对于一个文件的操作只需写一次，此句必须写VBS Set fso = CreateObject("Scripting.FileSystemObject")

0.判断一个文件或文件夹是否存在(yn是返回值，文件存在返回1，不存在返回0)

VBS yn=fso.FileExists(判断文件的目录)

1.创建一个文件(蓝字定义该文本文件是否可以被下次写入覆盖，省略默认为ture)

VBS set ttfile=fso.createtextfile(创建的文件目录,ture|false)

2.打开一个已存在的文件(蓝字定义文件写入方式，分别为a.只读b.可读写,但每打开一次文件重写c.在文件末尾写)

VBS const forreading=1

VBS const forwriting=2

VBS const forappending=8

注意：要想更改打开方式必须关闭文件重新打开

VBS set ttfile=fso.opentextfile(打开文件的目录,forreading|forwriting|forappending)

3.关闭一个打开的文件(红色部分要于已经打开的文件红色部分相同)

VBS ttfile.close

4.读取打开文件的一行并回车(红色部分ttfile要于已经打开的文件红色部分相同)

VBS read=ttfile.ReadLine

5.读取所有文件内容(红色部分ttfile要于已经打开的文件红色部分相同)

VBS read=ttfile.ReadAll

6.写入一行并回车(红色部分要于已经打开的文件红色部分相同)

VBS ttfile.writeline(自己要写入的内容)

7.删除指定文件(若已定义过ttfile则不需要第一句)

V