在下劃線上填寫適當(dāng)?shù)膬?nèi)容,以便向當(dāng)前目錄中的文本文件“test.txt”中寫入數(shù)據(jù)
<%
Dim fso , f , rc
rc = ()("txtContent") ’接收表單提交的文本數(shù)據(jù)
’創(chuàng)建FSO對(duì)象實(shí)例
Set fso = ()("Scripting.FileSystemObject")
’創(chuàng)建文件并返回textStream對(duì)象,以覆蓋方式打開(kāi)文件
Set f = fso. CreateTextFile (Server.MapPath("./test.txt"),true)
’向文件中寫入數(shù)據(jù)
f. WriteLine rc&"()"
f. Close ’關(guān)閉文件流對(duì)象 %>