在括號(hào)里填寫(xiě)適當(dāng)?shù)膬?nèi)容,以便讀取當(dāng)前目錄中的文本文件“test.txt”
<%
Dim fso , f
Set fso = Server.CreateObject() ’創(chuàng)建FSO對(duì)象實(shí)例
Set f = fso.()() ’打開(kāi)文件并返回textStream對(duì)象
while Not f.() ’當(dāng)文件指針不在文本文件末尾時(shí)執(zhí)行循環(huán)
Response.Write f.()&"<BR>" ’讀取一行字符發(fā)送到瀏覽器
Wend
f.Close
%>
在括號(hào)里寫(xiě)適當(dāng)?shù)膬?nèi)容,以便在當(dāng)前目錄中創(chuàng)建一個(gè)名為“test.txt”的文本文件。
<%
Dim fso , f
Set fso = Server.CreateObject() ’創(chuàng)建FSO對(duì)象實(shí)例
Set f = fso.()() ’創(chuàng)建文件并返回textStream對(duì)象
f.() "Hello"
f.()
%>