91精品一区二区三区四区,国产一区二区在线影院

作者 : 甘冀平 ;

　　假設(shè)你想創(chuàng)建一個(gè)簡(jiǎn)單的留言簿，你可以建立一個(gè)數(shù)據(jù)庫(kù)，在其中存儲(chǔ)用戶(hù)的信息。然而，如果并不需要數(shù)據(jù)庫(kù)的強(qiáng)大功能，使用FSO來(lái)存儲(chǔ)信息將節(jié)省你的時(shí)間和金錢(qián)。并且，一些ISP也許限制了web上的數(shù)據(jù)庫(kù)應(yīng)用。

　　假設(shè)你在一個(gè)表單中收集了一些用戶(hù)信息，這里是一個(gè)簡(jiǎn)單表單HTML代碼：

html>
body>

form action="formhandler.asp" method="post">
input type="text" size="10" name="username">
input type="text" size="10" name="homepage">
input type="text" size="10" name="Email">
/form>
/body>
/html>

　　再看看formhandler.asp中處理表單的代碼：

%
' Get form info
strName = Request.Form("username")
strHomePage = Request.Form("homepage")
strEmail = Request.Form("Email")

' create the fso object
Set fso = Server.CreateObject("Scripting.FileSystemObject")

　　迄今為止，還沒(méi)有新鮮的東西，無(wú)非是獲取表單域的值并且賦值到變量。下面出現(xiàn)了有趣的部分－寫(xiě)文件：

path = "c: emp est.txt"
ForReading = 1, ForWriting = 2, ForAppending = 3

' open the file
set file = fso.opentextfile(path, ForAppending, TRUE)

' write the info to the file
file.write(strName) vbcrlf
file.write(strHomePage) vbcrlf
file.write(strEmail) vbcrlf

' close and clean up
file.close
set file = nothing
set fso = nothing

　　回想一下，OpenTextFile方法返回一個(gè)TextStream對(duì)象，它是FSO模型中的另外一個(gè)對(duì)象。TextStream對(duì)象揭示了操作文件內(nèi)容的方法，比如寫(xiě)、讀一行、跳過(guò)一行。VB常量vbcrlf產(chǎn)生一個(gè)換行符。

　　在OpentextFile的命令參數(shù)中定義了TRUE，這就告訴了系統(tǒng)，如果文件不存在，就創(chuàng)建它。如果文件不存在，并且沒(méi)有定義TRUE參數(shù)，就會(huì)出錯(cuò)。

　　現(xiàn)在轉(zhuǎn)到目錄c: emp，打開(kāi)test.txt，你可以看到如下的信息：

User's name
User's home page
User's email

　　當(dāng)然，這些單詞可以被輸入在表單中的任何內(nèi)容所替換。

標(biāo)簽：涼山南京赤峰上海楚雄通遼清遠(yuǎn) 邢臺(tái)

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《ASP中FSO的神奇功能 - 寫(xiě)文件》，本文關(guān)鍵詞 ASP,中,FSO,的,神奇,功能,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。