該組件是負(fù)責(zé)啟動文件或目錄的管理,如果你象讀取文件的內(nèi)容,你必須配合Textstream一起用。它提供了Createtextfile,openTextFile,GetFile,GetFileName等函數(shù)。下面是一個實(shí)例:如何利用ASP在一個以有文件中添加內(nèi)容
例子
<!-- Story.asp --> <% IF NOT Request.Form("NextLine")="" THEN Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject") Set MyTextFile=MyFileObject.OpenTextFile("d:\story.txt", 8, TRUE) MyTextFile.WriteLine(Request.Form("NextLine")) MyTextFile.Close END IF %> <HTML> <HEAD><TITLE> Online Story </TITLE></HEAD> <BODY> <HR> <% Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject") Set MyTextFile=MyFileObject.OpenTextFile("d:\story.txt") WHILE NOT MyTextFile.AtEndOfStream Response.Write(" "&MyTextFile.ReadLine) WEND MyTextFile.Close %> <HR> <H3>Enter a new line for the story: </H3> <FORM METHOD="POST" ACTION="story.asp"> <INPUT NAME="NextLine" TYPE="TEXT" SIZE=70 maxlength="100"> <INPUT TYPE="SUBMIT" VALUE="Submit Sentence"> </FORM> </BODY> </HTML> (出處:熱點(diǎn)網(wǎng)絡(luò))
|