對于文件的操作，例如：生成一個或者打開一個或者刪除一個.txt格式文件。
雖然官方的file插件提供了一些基本功能，但功能不多。
你并不需要理解什么是fso模版，什么是vbs語句，直接套用下面的語句吧！
紅色字為自己定義的部分，藍色字為任意選一部分
如果你看不懂，請參考下面的例子！
操作同一個文件紅色部分必須相同
請認真看括號內(nèi)的解釋內(nèi)容
定義一個名為fso的關(guān)系文件問題的對象，對于一個文件的操作只需寫一次，此句必須寫
vbs set fso = createobject(scripting.filesystemobject)
0.判斷一個文件或文件夾是否存在(yn是返回值，文件存在返回1，不存在返回0)
vbs yn=fso.fileexists(判斷文件的目錄)
1.創(chuàng)建一個文件(藍字定義該文本文件是否可以被下次寫入覆蓋，省略默認為ture)
vbs set ttfile=fso.createtextfile(創(chuàng)建的文件目錄,ture|false)
2.打開一個已存在的文件(藍字定義文件寫入方式，分別為a.只讀b.可讀寫,但每打開一次文件重寫c.在文件末尾寫)
vbs const forreading=1
vbs const forwriting=2
vbs const forappending=8
注意：要想更改打開方式必須關(guān)閉文件重新打開
vbs set ttfile=fso.opentextfile(打開文件的目錄,forreading|forwriting|forappending)
3.關(guān)閉一個打開的文件(紅色部分要于已經(jīng)打開的文件紅色部分相同)
vbs ttfile.close
4.讀取打開文件的一行并回車(紅色部分ttfile要于已經(jīng)打開的文件紅色部分相同)
vbs read=ttfile.readline
5.讀取所有文件內(nèi)容(紅色部分ttfile要于已經(jīng)打開的文件紅色部分相同)
vbs read=ttfile.readall
6.寫入一行并回車(紅色部分要于已經(jīng)打開的文件紅色部分相同)
vbs ttfile.writeline(自己要寫入的內(nèi)容)
7.刪除指定文件(若已定義過ttfile則不需要第一句)
vbs set ttfile=fso.getfile(要刪的文件目錄)
vbs ttfile.delete
8.判斷輸入標(biāo)記是否在末尾(是返回-1，否則返回0)
vbs yn=ttfile.atendofstream
以下是一些文件夾的操作
8.判斷是否為根目錄(yn是返回值，文件存在返回1，不存在返回0)
vbs yn=fso.isrootfolder
9.讀取文件夾
vbs set ttfile=fso.getfolder(文件夾目錄)
10.創(chuàng)建一個文件夾
vbs set ttfile=fso.creafolder(創(chuàng)建的文件夾目錄)
11.刪除指定文件夾(若已定義過ttfile則不需要第一句)
vbs set ttfile=fso.getfolder(要刪的文件目錄)
vbs ttfile.deletefolder
下面是其他一些經(jīng)常用到的文件操作(注意：可用于所有格式的文件。紅字是你的上文腳本已經(jīng)定義過的)
vbs ttfile.size 返回文件大小
vbs ttfile.type 返回文件類型
vbs ttfile.datecreated 返回文件創(chuàng)建時間
vbs ttfile.datelastaccessed 返回文件最近訪問時間
vbs ttfile.datelastmodified 返回文件最后修改時間
vbs ttfile.name 返回文件名稱
vbs ttfile.shortpath 返回文件短路徑名
vbs ttfile.path 返回文件物理地址
代碼如下:
vbs set fso = createobject(scripting.filesystemobject)
//判斷d盤下是否有文件1.txt
vbs pd1=fso.fileexists(d:\1.txt)
if 0=pd1
//沒有的話，在d盤下創(chuàng)建一個不可覆蓋的文件1.txt
vbs set txtfile=fso.createtextfile(d:\1.txt,false)
//以在末尾寫入的方式打開1.txt
vbs set txtfile=fso.opentextfile(d:\1.txt,forappending)
//寫入一行“1234567890”
vbs txtfile.writeline(1234567890)
//關(guān)閉1.txt
vbs txtfile.close
endif
//以只讀方式打開1.txt
vbs set txtfile=fso.opentextfile(d:\1.txt,forreading)
//讀取第一行，并將其賦予變量read
vbs read=txtfile.readline
//關(guān)閉1.txt
vbs txtfile.close