這篇文章主要介紹了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則不需要第一句)
VBS set  ttfile=fso.GetFile(要刪的文件目錄)
VBS ttfile.delete

8.判斷輸入標記是否在末尾(是返回-1，否則返回0)
VBS  yn=ttfile.atendofstream

以下是一些文件夾的操作
8.判斷是否為根目錄(yn是返回值，文件存在返回1，不存在返回0)
VBS yn=fso.IsRootFolder

9.讀取文件夾
VBS set ttfile=fso.GetFolder(文件夾目錄)

10.創建一個文件夾
VBS set ttfile=fso.creaFolder(創建的文件夾目錄)

11.刪除指定文件夾(若已定義過ttfile則不需要第一句)
VBS set  ttfile=fso.GetFolder(要刪的文件目錄)
VBS ttfile.deletefolder

下面是其他一些經常用到的文件操作(注意：可用于所有格式的文件。紅字是你的上文腳本已經定義過的)
VBS ttfile.size                               返回文件大小
VBS ttfile.type                             返回文件類型
VBS ttfile.DateCreated                  返回文件創建時間
VBS ttfile.DatelastAccessed            返回文件最近訪問時間
VBS ttfile.DateLastModified            返回文件最后修改時間
VBS ttfile.name                            返回文件名稱
VBS ttfile.ShortPath                      返回文件短路徑名
VBS ttfile.path                             返回文件物理地址



一時間沒有完全列出所有函數，不足的部分希望大家跟帖補上。