VB中filesystemobject对象实现文件存取方法

最简单的方法是使用filesystemobject对象。而它并非VB内置对象，
需引用才可以使用。
1．filesystemObject对象引用
“工程/引用/microsoft scription Runtime”
 在对象浏览器窗口中选“scripting”模块，看到增了许多对象，
drive filesystemobject    textstream    file等
其中filesystemobject是这些对象的关键，想要使用其它对象，
都必须先建立filesystemobject对象。
２．文件存取
 dim fs  as  new  filesystemobject  建立filesystemobject对象
 dim  txtf  as  textstream          定义了一个textstream对象变量
textstrem对象与文件的读写所有文件都必须先打开，才能读写，
filesystemobjet对象所提供的打开文件的方法有两种：
opentextfile  打开文件
createtextfile  建立文件
 通过filesystemobject所打开的文件是一个TextStream对象，
而通过textstream对象的各种方法和属性，就可以进一步读写文件。
 1）opentextfile  方法：打开文件
set  textstream对象名=filesystemobject名.opentextfile(文件名，IO模式，是否自动建立文件）
文件名：建议写入完整路径的文件名。
IO模式：可设置成forreading(=1)、forwrting(=2)或forappending(=8)。       
如果设置成forreading，则打开的文件是只读的；
如果设置成forwriting，则打开的文件是可写的，而原来文件                     的内容会被清除；
如果设置成forappending，则打开的文件是可写的，但原文件             的内容不会被清除，数据会从文件             的最后面开始写入。
参数缺省：   表示forreading 只读。
是否自动建立文件：可设置成true或false。
设置为：true     则当文件不存在时，会自动