ASP編程入門進階（十八）：FSO組件之文件操作（上）

2024-05-04 11:02:19

字體：大中小

來源：轉載

供稿：網友

FSO中除了可以對驅動器、文件夾的操作以外，功能最強大的就是對文件的操作了。它可以用來記數、內容管理、搜索還可生成動態HTML頁面等等。

一、fso.OpenTextFile
無需多說，fso.OpenTextFile就是打開某個文件了，一般情況之下是打開的txt文本文件。所以首先我們先建立一個txt文件，然后通過FSO來讀取其中的內容。

1，info.txt

name:cnbruce
sex:male

建立了該文件，下面再做個ASP頁面，當然最好兩個文件是在同一目錄下。

2，opentxt.asp

<%
whichfile=server.mappath("info.txt")
Set fso = CreateObject("Scripting.FileSystemObject")
Set txt = fso.OpenTextFile(whichfile,1)
rline = txt.ReadLine
rline = rline & "<br>" & txt.ReadLine
Response.Write rline
txt.Close
%>

需要注意：無論是通過FSO打開驅動器、打開文件夾、打開文件，以及以后要接觸到的打開數據庫，都只能是打開絕對物理路徑地址。但一般情況是上傳到空間服務商那,不能很直接地了解到自己文件的所在位置，所以強烈推薦使用server.mappath方法：平臺移植性強，適用性強。

CreateObject("Scripting.FileSystemObject")建立了FSO組件的連接，fso.OpenTextFile(whichfile,1)打開了info.txt該文件。參數“1”表示“ForReading：以只讀方式打開文件。不能寫這個文件?！保渌€有參數“2”表示“ForWriting：以寫方式打開文件”，參數“8”表示“ForAppending：打開文件并從文件末尾開始寫”。

打開了該文件，接下來是不是要顯示文件中的內容？那就通過txt.ReadLine方法讀取文本中的一整行，如果需要繼續讀取下一行，則繼續使用txt.ReadLine方法。當然初此還有其它的讀取方法，比如txt.Read(7)讀取指定數量的字符，txt.ReadAll返回文本中的全部內容。

二、fso.CreateTextFile
如fso.CreateFolder建立文件夾般，fso.CreateTextFile則是建立文件了。

3，creattxt.asp

<%
whichfile=server.mappath("info.txt")
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile(whichfile,True)
MyFile.WriteLine("My Name Is CN-Bruce")
MyFile.WriteLine("My Sex Is Male")
MyFile.Close
%>
<a href="opentxt.asp">查看內容</a>

本次建立的文件是上一info.txt文件，fso.CreateTextFile(whichfile,True)其中的參數true即表示能覆蓋已有文件。建立后需要向里面添加數據就采用“MyFile.WriteLine”了。

那現在就可以建立一個簡單的文本記數器了，還記得以前的記數？：1，通過application、session、global.asa進行記數；2，通過Counter組件進行記數。但兩者都有通病，就是不能保存，如果服務器重新啟動后，是不是所有記數全部清空了呢：）那現在就可以使用文本來記錄數據了，即使重啟，下次提取的也還是該文件。

上一篇：ASP編程入門進階（十）：Global.asa文件

下一篇：ASP編程入門進階（二）：認識表單